1
0
Prechádzať zdrojové kódy

Better defaults for jtalkc and a small meta example added for node.

Göran Krampe 13 rokov pred
rodič
commit
75a0f9f9b7
3 zmenil súbory, kde vykonal 33 pridanie a 2 odobranie
  1. 2 2
      bin/jtalkc
  2. 8 0
      nodejs/meta/Makefile
  3. 23 0
      nodejs/meta/MyScript.st

+ 2 - 2
bin/jtalkc

@@ -127,10 +127,10 @@ INITIALIZER="$JTALK/js/init.js"
 
 # Default values
 ENV=
-INIT=
+INIT=$INITIALIZER
 MAIN=
 MAINFILE=
-BASE=
+BASE=$KERNEL
 LOAD=
 LOADANDADD=
 CLOSUREOPTS=

+ 8 - 0
nodejs/meta/Makefile

@@ -0,0 +1,8 @@
+Program.js: MyScript.st
+	../../bin/jtalkc -N -C -m MyScript MyScript.st Program
+
+run: Program.js
+	node Program.js
+
+clean:
+	rm -f Program.js MyScript.js

+ 23 - 0
nodejs/meta/MyScript.st

@@ -0,0 +1,23 @@
+Object subclass: #MyScript
+	instanceVariableNames: ''
+	category: 'MyScript'!
+
+!MyScript class methodsFor: 'main'!
+main
+	| class compiler method |
+	Object subclass: #Dummy instanceVariableNames: '' category: 'Dummy'.
+	class := smalltalk at: #Dummy.	
+	compiler := Compiler new.
+
+	method := compiler load: 'foo ^ 10' forClass: class.
+	method category: 'foo'.
+	class addCompiledMethod: method.
+
+	method := compiler load: 'bar ^ self foo * 2' forClass: class.
+	method category: 'foo'.
+	class addCompiledMethod: method.
+
+	console log: (Exporter new exportCategory: 'Dummy')
+! !
+
+