explicit load stdlibs after load_language

fperrad · Sep 6, 2009 · 5a856f7 · 5a856f7
1 parent 9f8e27f
commit 5a856f7
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 2 deletions.
diff --git a/src/script.pir b/src/script.pir
@@ -103,6 +103,7 @@
   $P0 = get_hll_global '@stdlibs'
   unless null $P0 goto L1
   load_language 'wmlscript'
+  load_stdlibs()
 L1:
 PIRCODE
 

diff --git a/src/wmlsstdlibs.pir b/src/wmlsstdlibs.pir
@@ -21,8 +21,7 @@ See "WMLScript Standard Libraries Specification".
 
 =cut
 
-.sub '__onload' :load :anon
-#    print "__onload (wmlsstdlibs.pir)\n"
+.sub 'load_stdlibs'
     load_bytecode 'library/wmlslang.pbc'
     load_bytecode 'library/wmlsfloat.pbc'
     load_bytecode 'library/wmlsstring.pbc'

diff --git a/wmlsi.pir b/wmlsi.pir
@@ -23,6 +23,7 @@ parrot-wmlsd
 .sub 'main' :main
     .param pmc argv
     load_language 'wmlscript'
+    load_stdlibs()
     .local int argc
     .local string progname
     .local string filename