Author: fperrad
Date: Wed Aug 6 05:09:24 2008
New Revision: 30055
Modified:
trunk/languages/lua/src/lib/bc.pir
trunk/languages/lua/src/lib/bitlib.pir
trunk/languages/lua/src/lib/gl.pir
Log:
[Lua]
- refactor namespace : extension libraries (step 2)
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 05:09:24 2008
@@ -161,7 +161,7 @@
new $P0, 'LuaNumber'
set $P0, 0
- set_hll_global ['Lua::bc'], 'DIGITS', $P0
+ set_hll_global ['Lua'; '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 ['Lua'; '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 05:09:24 2008
@@ -112,14 +112,14 @@
L1:
new $P0, 'Integer'
set $P0, max
- set_hll_global ['Lua::bit'], 'BIT_MAX', $P0
+ set_hll_global ['Lua'; '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 ['Lua'; '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 ['Lua'; '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 ['Lua'; '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 ['Lua'; '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 05:09:24 2008
@@ -738,7 +738,7 @@
_gl[$P1] = _gl_Viewport
$P0 = _gl_str()
- set_hll_global ['Lua::gl'], 'gl_str', $P0
+ set_hll_global ['Lua'; '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 ['Lua'; '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 ['Lua'; 'gl'], 'gl_str'
new $P0, 'Iterator', gl_str
L1:
unless $P0 goto L2
