2
0
Quellcode durchsuchen

Smalltalk vm returning `smalltalk` from `boot.js`

Herbert Vojčík vor 10 Jahren
Ursprung
Commit
acefc95cf8
2 geänderte Dateien mit 21 neuen und 0 gelöschten Zeilen
  1. 16 0
      js/Kernel-Infrastructure.js
  2. 5 0
      st/Kernel-Infrastructure.st

+ 16 - 0
js/Kernel-Infrastructure.js

@@ -2634,6 +2634,22 @@ referencedClasses: []
 }),
 smalltalk.SmalltalkImage);
 
+smalltalk.addMethod(
+smalltalk.method({
+selector: "vm",
+protocol: 'accessing',
+fn: function (){
+var self=this;
+return smalltalk.withContext(function($ctx1) { 
+return smalltalk;
+return self}, function($ctx1) {$ctx1.fill(self,"vm",{},smalltalk.SmalltalkImage)})},
+args: [],
+source: "vm\x0a\x09\x22Future compatibility to be able to use Smalltalk vm ...\x22\x0a\x09<return smalltalk>",
+messageSends: [],
+referencedClasses: []
+}),
+smalltalk.SmalltalkImage);
+
 
 smalltalk.SmalltalkImage.klass.iVarNames = ['current'];
 smalltalk.addMethod(

+ 5 - 0
st/Kernel-Infrastructure.st

@@ -836,6 +836,11 @@ version
 	"Answer the version string of Amber"
 	
 	^ '0.13.0-pre'
+!
+
+vm
+	"Future compatibility to be able to use Smalltalk vm ..."
+	<return smalltalk>
 ! !
 
 !SmalltalkImage methodsFor: 'accessing amd'!