Author: fperrad
Date: Wed Aug 6 12:20:31 2008
New Revision: 30066
Modified:
trunk/languages/lua/src/lib/alarm.pir
trunk/languages/lua/src/lib/base64.pir
trunk/languages/lua/src/lib/bc.pir
trunk/languages/lua/src/lib/bitlib.pir
trunk/languages/lua/src/lib/gl.pir
trunk/languages/lua/src/lib/glut.pir
trunk/languages/lua/src/lib/lfs.pir
trunk/languages/lua/src/lib/md5.pir
trunk/languages/lua/src/lib/random.pir
trunk/languages/lua/src/lib/uuid.pir
Log:
[Lua]
- refactor namespace : extension libraries (step 4)
Modified: trunk/languages/lua/src/lib/alarm.pir
==============================================================================
--- trunk/languages/lua/src/lib/alarm.pir (original)
+++ trunk/languages/lua/src/lib/alarm.pir Wed Aug 6 12:20:31 2008
@@ -18,7 +18,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'alarm' ]
+.namespace [ 'alarm' ]
.sub '__onload' :anon :load
# print "__onload alarm\n"
Modified: trunk/languages/lua/src/lib/base64.pir
==============================================================================
--- trunk/languages/lua/src/lib/base64.pir (original)
+++ trunk/languages/lua/src/lib/base64.pir Wed Aug 6 12:20:31 2008
@@ -18,7 +18,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'base64' ]
+.namespace [ 'base64' ]
.sub '__onload' :anon :load
# print "__onload base64\n"
Modified: trunk/languages/lua/src/lib/bc.pir
==============================================================================
--- trunk/languages/lua/src/lib/bc.pir (original)
+++ trunk/languages/lua/src/lib/bc.pir Wed Aug 6 12:20:31 2008
@@ -21,7 +21,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'bc' ]
+.namespace [ 'bc' ]
.sub '__onload' :anon :load
# print "__onload bc\n"
@@ -161,7 +161,7 @@
new $P0, 'LuaNumber'
set $P0, 0
- set_hll_global ['Lua'; 'bc'], 'DIGITS', $P0
+ set_hll_global ['bc'], 'DIGITS', $P0
.return (_bc)
.end
@@ -236,7 +236,7 @@
.param pmc extra :slurpy
.local pmc res
.local int DIGITS
- $P0 = get_hll_global ['Lua'; 'bc'], 'DIGITS'
+ $P0 = get_hll_global ['bc'], 'DIGITS'
res = clone $P0
DIGITS = $P0
$I1 = lua_optint(1, n, DIGITS)
Modified: trunk/languages/lua/src/lib/bitlib.pir
==============================================================================
--- trunk/languages/lua/src/lib/bitlib.pir (original)
+++ trunk/languages/lua/src/lib/bitlib.pir Wed Aug 6 12:20:31 2008
@@ -21,7 +21,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'bitlib' ]
+.namespace [ 'bitlib' ]
.sub '__onload' :anon :load
# print "__onload bitlib\n"
@@ -112,14 +112,14 @@
L1:
new $P0, 'Integer'
set $P0, max
- set_hll_global ['Lua'; 'bit'], 'BIT_MAX', $P0
+ set_hll_global ['bit'], 'BIT_MAX', $P0
.return (bits)
.end
.macro MONADIC(op, a)
.local pmc res
.local int BIT_MAX
- $P0 = get_hll_global ['Lua'; 'bit'], 'BIT_MAX'
+ $P0 = get_hll_global ['bit'], 'BIT_MAX'
BIT_MAX = $P0
$I1 = lua_checknumber(1, .a)
.op $I0, $I1
@@ -132,7 +132,7 @@
.macro VARIADIC(op, a, vararg)
.local pmc res
.local int BIT_MAX
- $P0 = get_hll_global ['Lua'; 'bit'], 'BIT_MAX'
+ $P0 = get_hll_global ['bit'], 'BIT_MAX'
BIT_MAX = $P0
$I1 = lua_checknumber(1, .a)
.local int i
@@ -154,7 +154,7 @@
.macro LOGICAL_SHIFT(op, a, b)
.local pmc res
.local int BIT_MAX
- $P0 = get_hll_global ['Lua'; 'bit'], 'BIT_MAX'
+ $P0 = get_hll_global ['bit'], 'BIT_MAX'
BIT_MAX = $P0
$I1 = lua_checknumber(1, .a)
band $I1, BIT_MAX
@@ -169,7 +169,7 @@
.macro ARITHMETIC_SHIFT(op, a, b)
.local pmc res
.local int BIT_MAX
- $P0 = get_hll_global ['Lua'; 'bit'], 'BIT_MAX'
+ $P0 = get_hll_global ['bit'], 'BIT_MAX'
BIT_MAX = $P0
$I1 = lua_checknumber(1, .a)
$I2 = lua_checknumber(2, .b)
Modified: trunk/languages/lua/src/lib/gl.pir
==============================================================================
--- trunk/languages/lua/src/lib/gl.pir (original)
+++ trunk/languages/lua/src/lib/gl.pir Wed Aug 6 12:20:31 2008
@@ -19,7 +19,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'gl' ]
+.namespace [ 'gl' ]
.sub '__onload' :anon :load
# print "__onload gl\n"
@@ -738,7 +738,7 @@
_gl[$P1] = _gl_Viewport
$P0 = _gl_str()
- set_hll_global ['Lua'; 'gl'], 'gl_str', $P0
+ set_hll_global ['gl'], 'gl_str', $P0
.return (_gl)
.end
@@ -1340,7 +1340,7 @@
.sub 'get_gl_enum' :anon
.param string str
.local pmc gl_str
- gl_str = get_hll_global ['Lua'; 'gl'], 'gl_str'
+ gl_str = get_hll_global ['gl'], 'gl_str'
.local int ret
ret = 0
$P0 = split ',', str
@@ -1362,7 +1362,7 @@
.sub 'get_str_gl_enum' :anon
.param int enum
.local pmc gl_str
- gl_str = get_hll_global ['Lua'; 'gl'], 'gl_str'
+ gl_str = get_hll_global ['gl'], 'gl_str'
new $P0, 'Iterator', gl_str
L1:
unless $P0 goto L2
Modified: trunk/languages/lua/src/lib/glut.pir
==============================================================================
--- trunk/languages/lua/src/lib/glut.pir (original)
+++ trunk/languages/lua/src/lib/glut.pir Wed Aug 6 12:20:31 2008
@@ -19,7 +19,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'glut' ]
+.namespace [ 'glut' ]
.sub '__onload' :anon :load
# print "__onload glut\n"
Modified: trunk/languages/lua/src/lib/lfs.pir
==============================================================================
--- trunk/languages/lua/src/lib/lfs.pir (original)
+++ trunk/languages/lua/src/lib/lfs.pir Wed Aug 6 12:20:31 2008
@@ -22,7 +22,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'lfs' ]
+.namespace [ 'lfs' ]
.sub '__onload' :anon :load
# print "__onload lfs\n"
Modified: trunk/languages/lua/src/lib/md5.pir
==============================================================================
--- trunk/languages/lua/src/lib/md5.pir (original)
+++ trunk/languages/lua/src/lib/md5.pir Wed Aug 6 12:20:31 2008
@@ -19,7 +19,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'md5' ]
+.namespace [ 'md5' ]
.sub '__onload' :anon :load
# print "__onload md5\n"
Modified: trunk/languages/lua/src/lib/random.pir
==============================================================================
--- trunk/languages/lua/src/lib/random.pir (original)
+++ trunk/languages/lua/src/lib/random.pir Wed Aug 6 12:20:31 2008
@@ -19,7 +19,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'random' ]
+.namespace [ 'random' ]
.sub '__onload' :anon :load
# print "__onload random\n"
Modified: trunk/languages/lua/src/lib/uuid.pir
==============================================================================
--- trunk/languages/lua/src/lib/uuid.pir (original)
+++ trunk/languages/lua/src/lib/uuid.pir Wed Aug 6 12:20:31 2008
@@ -18,7 +18,7 @@
=cut
.HLL 'Lua', 'lua_group'
-.namespace [ 'Lua'; 'uuid' ]
+.namespace [ 'uuid' ]
.sub '__onload' :anon :load
# print "__onload uuid\n"
