r5 - in /packages/mtasc/trunk: debian/ ocaml/mtasc/ ocaml/mtasc/doc/

pabs-guest at users.alioth.debian.org pabs-guest at users.alioth.debian.org
Fri Jun 2 08:56:38 UTC 2006 

Author: pabs-guest
Date: Fri Jun  2 08:56:35 2006
New Revision: 5

URL: http://svn.debian.org/wsvn/?sc=1&rev=5
Log:
Load newtrunk into packages/mtasc/trunk.

Added:
    packages/mtasc/trunk/debian/
    packages/mtasc/trunk/debian/HelloWorld.as
    packages/mtasc/trunk/debian/changelog
    packages/mtasc/trunk/debian/compat
    packages/mtasc/trunk/debian/control
    packages/mtasc/trunk/debian/copyright
    packages/mtasc/trunk/debian/dirs
    packages/mtasc/trunk/debian/examples
    packages/mtasc/trunk/debian/install
    packages/mtasc/trunk/debian/maketarball
    packages/mtasc/trunk/debian/manpages
    packages/mtasc/trunk/debian/mtasc.1
    packages/mtasc/trunk/debian/rules   (with props)
    packages/mtasc/trunk/debian/watch
Modified:
    packages/mtasc/trunk/ocaml/mtasc/doc/install.ml
    packages/mtasc/trunk/ocaml/mtasc/main.ml

Added: packages/mtasc/trunk/debian/HelloWorld.as
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/HelloWorld.as?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/HelloWorld.as (added)
+++ packages/mtasc/trunk/debian/HelloWorld.as Fri Jun  2 08:56:35 2006
@@ -1,0 +1,15 @@
+// Run: mtasc -swf helloworld.swf -main -header 640:480:20 HelloWorld.as
+// Your basic Hello World app that every language needs
+class HelloWorld {
+
+	static var app : HelloWorld;
+
+	function HelloWorld() {
+		_root.createTextField("tf",0,0,0,640,480);
+		_root.tf.text = "Hello world !";
+	}
+
+	static function main(mc) {
+		app = new HelloWorld();
+	}
+}

Added: packages/mtasc/trunk/debian/changelog
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/changelog?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/changelog (added)
+++ packages/mtasc/trunk/debian/changelog Fri Jun  2 08:56:35 2006
@@ -1,0 +1,21 @@
+mtasc (1.12-3) unstable; urgency=low
+
+  * Use an argument to dh_gencontrol instead of modifying mtasc.substvars
+
+ -- Paul Wise <pabs3 at bonedaddy.net>  Tue, 18 Apr 2006 13:19:46 +0800
+
+mtasc (1.12-2) unstable; urgency=low
+
+  * Restructure the package to use install.ml and build bytecode versions
+    on arches where ocaml can't yet build native code. This fixes the FTBFS
+    on several arches. mtasc has some C code, so I can't create an arch all
+    package. Thanks to Sven Luther and the OCaml team. Closes: #360047
+
+ -- Paul Wise <pabs3 at bonedaddy.net>  Sat, 25 Mar 2006 17:15:45 +0800
+
+mtasc (1.12-1) unstable; urgency=low
+
+  * Initial release (Closes: #326931)
+
+ -- Paul Wise <pabs3 at bonedaddy.net>  Sun,  5 Mar 2006 12:05:37 +0800
+

Added: packages/mtasc/trunk/debian/compat
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/compat?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/compat (added)
+++ packages/mtasc/trunk/debian/compat Fri Jun  2 08:56:35 2006
@@ -1,0 +1,1 @@
+4

Added: packages/mtasc/trunk/debian/control
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/control?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/control (added)
+++ packages/mtasc/trunk/debian/control Fri Jun  2 08:56:35 2006
@@ -1,0 +1,16 @@
+Source: mtasc
+Section: devel
+Priority: optional
+Maintainer: Paul Wise <pabs3 at bonedaddy.net>
+Build-Depends: debhelper (>= 4.0.0), ocaml, ocaml-best-compilers, ocaml-findlib, libextlib-ocaml-dev (>= 1.5), zlib1g-dev
+Standards-Version: 3.6.2
+
+Package: mtasc
+Architecture: any
+Depends: ${shlibs:Depends}, ${misc:Depends}, ${ocaml:Depends}
+Description: ActionScript 2 to Flash (SWF) compiler
+ MTASC is the first ActionScript 2 Open Source free compiler. It can compile
+ large numbers of .as class files in a very short time and generate directly
+ the corresponding SWF bytecode.
+ .
+  Homepage: http://www.mtasc.org

Added: packages/mtasc/trunk/debian/copyright
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/copyright?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/copyright (added)
+++ packages/mtasc/trunk/debian/copyright Fri Jun  2 08:56:35 2006
@@ -1,0 +1,29 @@
+This package was debianized by Paul Wise <pabs3 at bonedaddy.net> on
+Thu, 23 Feb 2006 20:32:28 +0800.
+
+It was downloaded from :pserver:anonymous at cvs.motion-twin.com:/cvsroot
+
+Copyright:
+
+Copyright 2004, 2005 Nicolas Cannasse
+
+License:
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+The GPL license does NOT imply that you source code will
+have to be GPL or Open Source. You can use MTASC in order to
+compiler any source code without restrictions. Only if you
+want use the compiler as part of your application you'll have
+to apply the GPL rules.
+
+On Debian GNU/Linux systems, the complete text of the GNU General
+Public License can be found in /usr/share/common-licenses/GPL.

Added: packages/mtasc/trunk/debian/dirs
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/dirs?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/dirs (added)
+++ packages/mtasc/trunk/debian/dirs Fri Jun  2 08:56:35 2006
@@ -1,0 +1,2 @@
+usr/bin
+usr/share/mtasc

Added: packages/mtasc/trunk/debian/examples
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/examples?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/examples (added)
+++ packages/mtasc/trunk/debian/examples Fri Jun  2 08:56:35 2006
@@ -1,0 +1,1 @@
+debian/HelloWorld.as

Added: packages/mtasc/trunk/debian/install
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/install?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/install (added)
+++ packages/mtasc/trunk/debian/install Fri Jun  2 08:56:35 2006
@@ -1,0 +1,3 @@
+ocaml/mtasc/mtasc usr/bin
+ocaml/mtasc/std usr/share/mtasc
+ocaml/mtasc/std8 usr/share/mtasc

Added: packages/mtasc/trunk/debian/maketarball
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/maketarball?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/maketarball (added)
+++ packages/mtasc/trunk/debian/maketarball Fri Jun  2 08:56:35 2006
@@ -1,0 +1,15 @@
+#!/bin/sh
+set -e
+package=`dpkg-parsechangelog | sed -n 's/^Source: //p'`
+tag=v`echo "$2" | sed 's/\./-/g'`
+rm -f "$3" ../$package-$2-linux.tgz
+mkdir $package-$2
+cd $package-$2
+cvs -z3 -d:pserver:anonymous at cvs.motion-twin.com:/cvsroot export -r HEAD ocaml/extc
+cvs -z3 -d:pserver:anonymous at cvs.motion-twin.com:/cvsroot export -r HEAD ocaml/swflib
+cvs -z3 -d:pserver:anonymous at cvs.motion-twin.com:/cvsroot export -r $tag ocaml/mtasc
+cd ..
+tar zcf $package-$2.tar.gz $package-$2/
+mv $package-$2.tar.gz ..
+rm -rf $package-$2/
+uupdate ../$package-$2.tar.gz $2

Added: packages/mtasc/trunk/debian/manpages
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/manpages?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/manpages (added)
+++ packages/mtasc/trunk/debian/manpages Fri Jun  2 08:56:35 2006
@@ -1,0 +1,1 @@
+debian/mtasc.1

Added: packages/mtasc/trunk/debian/mtasc.1
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/mtasc.1?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/mtasc.1 (added)
+++ packages/mtasc/trunk/debian/mtasc.1 Fri Jun  2 08:56:35 2006
@@ -1,0 +1,77 @@
+.TH MTASC "1" "February 2006" "mtasc " "User Commands"
+.SH NAME
+mtasc \- ActionScript 2 to Flash (SWF) compiler
+.SH DESCRIPTION
+.PP
+This manual page documents briefly the \fBmtasc\fR command.
+.PP
+It was written for Debian as \fBmtasc\fR does not have a manual page.
+.PP
+\fBmtasc\fR compiles ActionScript 2 files to Flash (SWF) files.
+.PP
+.SH SYNOPSIS
+\fBmtasc\fP [options] <files...>
+.SH OPTIONS
+.PP
+The options are processed from left to right. All of the options use a single dash.
+.TP
+\fB\-pack\fR <path>
+Compile all files in target package.
+.TP
+\fB\-cp\fR <path>
+Add classpath.
+.TP
+\fB\-v\fR
+Turn on verbose mode.
+.TP
+\fB\-strict\fR
+Turn on strict mode.
+.TP
+\fB\-infer\fR
+Turn on local variables inference.
+.TP
+\fB\-wimp\fR
+Turn on warnings for unused imports.
+.TP
+\fB\-msvc\fR
+Use MSVC style errors.
+.TP
+\fB\-mx\fR
+Use precompiled mx package.
+.TP
+\fB\-swf\fR <file>
+Input SWF file to update.
+.TP
+\fB\-out\fR <file>
+SWF output file.
+.TP
+\fB\-keep\fR
+Do not remove AS2 classes from input SWF.
+.TP
+\fB\-frame\fR <frame>
+Export into target frame (it must exist in the SWF).
+.TP
+\fB\-main\fR
+Enable the main entry point.
+.TP
+\fB\-header\fR <header>
+Specify header format. The format of this option is 'width:height:fps',
+where fps means frames per second.
+.TP
+\fB\-group\fR
+Group classes into a single clip
+.TP
+\fB\-exclude\fR <file>
+Exclude classes listed in a file.
+.TP
+\fB\-version\fR
+Change SWF version (6,7,8,...)
+.TP
+\fB\-trace\fR <function>
+Specify a TRACE function.
+.TP
+\fB\-help\fR or \fB\-\-help\fR
+Display a list of options and what they do.
+.SH "SEE ALSO"
+.PP
+The mtasc website (http://www.mtasc.org) and the mtasc osflash page (http://osflash.org/mtasc).

Added: packages/mtasc/trunk/debian/rules
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/rules?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/rules (added)
+++ packages/mtasc/trunk/debian/rules Fri Jun  2 08:56:35 2006
@@ -1,0 +1,55 @@
+#!/usr/bin/make -f
+
+#export DH_VERBOSE=1
+
+ifeq ($(shell test -x /usr/bin/ocamlopt -o -x /usr/bin/ocamlopt.opt && echo true),true)
+  OCAMLTYPE = -n
+  OCAMLSTRIP =
+  OCAMLDEPS = ocaml:Depends=
+else
+  OCAMLTYPE = -b
+  OCAMLSTRIP = -Xmtasc
+  OCAMLDEPS = ocaml:Depends=ocaml-base-nox-$(shell ocamlfind ocamlc -version)
+endif
+
+build: build-stamp
+build-stamp:
+	dh_testdir
+	ocaml ocaml/mtasc/doc/install.ml $(OCAMLTYPE)
+	touch build-stamp
+
+clean:
+	dh_testdir
+	dh_testroot
+	rm -f build-stamp
+	rm -f ocaml/*/*.cma ocaml/*/*.cmi ocaml/*/*.cmo ocaml/*/*.cmx
+	rm -f ocaml/*/*.cmxa ocaml/*/*.o ocaml/*/*.a
+	rm -f ocaml/mtasc/lexer.ml ocaml/mtasc/mtasc
+	dh_clean 
+
+install: build
+	dh_testdir
+	dh_testroot
+	dh_clean -k 
+	dh_installdirs
+	dh_install
+
+binary-indep: build install
+binary-arch: build install
+	dh_testdir
+	dh_testroot
+	dh_installchangelogs ocaml/mtasc/doc/CHANGES.txt
+	dh_installdocs
+	dh_installexamples
+	dh_installman
+	dh_strip $(OCAMLSTRIP)
+	dh_compress
+	dh_fixperms
+	dh_installdeb
+	dh_shlibdeps
+	dh_gencontrol -- -V$(OCAMLDEPS)
+	dh_md5sums
+	dh_builddeb
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary install

Propchange: packages/mtasc/trunk/debian/rules
------------------------------------------------------------------------------
    svn:executable = *

Added: packages/mtasc/trunk/debian/watch
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/debian/watch?rev=5&op=file
==============================================================================
--- packages/mtasc/trunk/debian/watch (added)
+++ packages/mtasc/trunk/debian/watch Fri Jun  2 08:56:35 2006
@@ -1,0 +1,2 @@
+version=3
+http://mtasc.org/ zip/mtasc-([\d.]*)-linux\.tgz debian sh ./debian/maketarball

Modified: packages/mtasc/trunk/ocaml/mtasc/doc/install.ml
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/ocaml/mtasc/doc/install.ml?rev=5&op=diff
==============================================================================
--- packages/mtasc/trunk/ocaml/mtasc/doc/install.ml (original)
+++ packages/mtasc/trunk/ocaml/mtasc/doc/install.ml Fri Jun  2 08:56:35 2006
@@ -22,9 +22,9 @@
 
 (* ----- BEGIN CONFIGURATION ---- *)
 
-let zlib = "zlib.lib"
-let bytecode = true
-let native = true
+let zlib = "/usr/lib/libz.so"
+let bytecode = ref false
+let native = ref false
 
 (* ------ END CONFIGURATION ----- *)
 
@@ -43,14 +43,15 @@
 	command ("cvs -z3 -d" ^ root ^ " " ^ cmd)
 
 let ocamlc file =
-	if bytecode then command ("ocamlc -c " ^ file);
-	if native then command ("ocamlopt -c " ^ file)
+	if !bytecode then command ("ocamlfind ocamlc -c " ^ file);
+	if !native then command ("ocamlfind ocamlopt -c " ^ file)
 
 let modules l ext =
 	String.concat " " (List.map (fun f -> f ^ ext) l)
 
 ;;
 
+(*
 let sourceforge = ":pserver:anonymous at cvs.sourceforge.net:/cvsroot/ocaml-lib" in
 let motiontwin = ":pserver:anonymous at cvs.motion-twin.com:/cvsroot" in
 
@@ -67,32 +68,35 @@
 	cvs motiontwin "co ocaml/extc";
 	
 in
+*)
 
 let compile() =
 
-	(try Unix.mkdir "bin" 0o740 with Unix.Unix_error(Unix.EEXIST,_,_) -> ());
+	(* (try Unix.mkdir "bin" 0o740 with Unix.Unix_error(Unix.EEXIST,_,_) -> ()); *)
 
 	(* EXTLIB *)
+	(*
 	Sys.chdir "extlib-dev";
 	command ("ocaml install.ml -nodoc -d ../ocaml " ^ (if bytecode then "-b " else "") ^ (if native then "-n" else ""));
 	msg "";
 	Sys.chdir "..";
+	*)
 
 	(* EXTC *)
 	Sys.chdir "ocaml/extc";
 	let c_opts = (if Sys.ocaml_version < "3.08" then " -ccopt -Dcaml_copy_string=copy_string " else " ") in
-	command ("ocamlc" ^ c_opts ^ "extc_stubs.c");
+	command ("ocamlfind ocamlc" ^ c_opts ^ "extc_stubs.c");
 
 	let options = "-cclib ../extc/extc_stubs" ^ obj_ext ^ " -cclib " ^ zlib ^ " extc.mli extc.ml" in
-	if bytecode then command ("ocamlc -a -o extc.cma " ^ options);
-	if native then command ("ocamlopt -a -o extc.cmxa " ^ options);
+	if !bytecode then command ("ocamlfind ocamlc -a -o extc.cma " ^ options);
+	if !native then command ("ocamlfind ocamlopt -a -o extc.cmxa " ^ options);
 	Sys.chdir "../..";
 
 	(* SWFLIB *)
 	Sys.chdir "ocaml/swflib";
 	let files = "-I .. -I ../extc swf.ml swfZip.ml actionScript.ml swfParser.ml" in
-	if bytecode then command ("ocamlc -a -o swflib.cma " ^ files);
-	if native then command ("ocamlopt -a -o swflib.cmxa " ^ files);
+	if !bytecode then command ("ocamlfind ocamlc -package extlib -a -o swflib.cma " ^ files);
+	if !native then command ("ocamlfind ocamlopt -package extlib -a -o swflib.cmxa " ^ files);
 	Sys.chdir "../..";
 
 	(* MTASC *)
@@ -100,15 +104,19 @@
 	command "ocamllex lexer.mll";
 	ocamlc "expr.ml lexer.ml";
 	ocamlc "-pp camlp4o parser.ml";
-	ocamlc "-I .. -I ../extc -I ../swflib typer.ml class.ml plugin.ml genSwf.ml main.ml";
+	ocamlc "-package extlib -I .. -I ../extc -I ../swflib typer.ml class.ml plugin.ml genSwf.ml main.ml";
 	let mlist = ["expr";"lexer";"parser";"typer";"class";"plugin";"genSwf";"main"] in
-	if bytecode then command ("ocamlc -custom -o ../../bin/mtasc-byte" ^ exe_ext ^ " ../extLib.cma ../extc/extc.cma ../swflib/swflib.cma " ^ modules mlist ".cmo");
-	if native then command ("ocamlopt -o ../../bin/mtasc" ^ exe_ext ^ " ../extLib.cmxa ../extc/extc.cmxa ../swflib/swflib.cmxa " ^ modules mlist ".cmx");
+	if !bytecode then command ("ocamlfind ocamlc -package extlib -custom -o mtasc" ^ exe_ext ^ " extLib.cma ../extc/extc.cma ../swflib/swflib.cma " ^ modules mlist ".cmo");
+	if !native then command ("ocamlfind ocamlopt -package extlib -o mtasc" ^ exe_ext ^ " extLib.cmxa ../extc/extc.cmxa ../swflib/swflib.cmxa " ^ modules mlist ".cmx");
 
 in
 let startdir = Sys.getcwd() in
 try
-	download();
+	let args = ref [] in
+	Arg.parse [
+		"-b", Arg.Set bytecode, "build bytecode version";
+		"-n", Arg.Set native, "native code version";
+	] (fun argi -> args := argi :: !args) "Usage:";
 	compile();
 	Sys.chdir startdir;
 with

Modified: packages/mtasc/trunk/ocaml/mtasc/main.ml
URL: http://svn.debian.org/wsvn/packages/mtasc/trunk/ocaml/mtasc/main.ml?rev=5&op=diff
==============================================================================
--- packages/mtasc/trunk/ocaml/mtasc/main.ml (original)
+++ packages/mtasc/trunk/ocaml/mtasc/main.ml Fri Jun  2 08:56:35 2006
@@ -112,8 +112,8 @@
 	if do_exit then exit 1
 ;;
 try	
-	let usage = "Motion-Twin ActionScript2 Compiler 1.12 - (c)2004-2005 Motion-Twin\n Usage : mtasc.exe [options] <files...>\n Options :" in
-	let base_path = normalize_path (try Extc.executable_path() with _ -> ".") in
+	let usage = "Motion-Twin ActionScript2 Compiler 1.12 - (c)2004-2005 Motion-Twin\n Usage : mtasc [options] <files...>\n Options :" in
+	let base_path = "/usr/share/mtasc/" in
 	let files = ref [] in
 	let time = Sys.time() in
 	Plugin.class_path := [base_path;"";"/"];

More information about the pkg-flash-devel mailing list