From 33cf10e922e32e220f41dc40dbb08365bb7dfa1c Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Tue, 20 Apr 2010 22:48:28 -0700
Subject: [PATCH] lua: clean up some literals abuse

---
 extra/lua/lua.factor | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/extra/lua/lua.factor b/extra/lua/lua.factor
index 730979e68e..fa997b1d65 100644
--- a/extra/lua/lua.factor
+++ b/extra/lua/lua.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors alien alien.accessors alien.c-types alien.libraries
 alien.syntax classes.struct combinators io.encodings.ascii kernel
-literals locals math system ;
+locals math system ;
 IN: lua
 
 << "liblua5.1" {
@@ -19,12 +19,12 @@ TYPEDEF: ptrdiff_t LUA_INTEGER
 CONSTANT: LUA_IDSIZE 60
 
 ! This is normally the BUFSIZ value of the given platform.
-CONSTANT: LUAL_BUFFERSIZE $[
+: LUAL_BUFFERSIZE ( -- x )
     {
         { [ os windows? ] [ 512 ] }
         { [ os macosx? ] [ 1024 ] }
         { [ os unix? ] [ 8192 ] }
-    } cond ] 
+    } cond ;
 
 ! lua.h
 CONSTANT: LUA_SIGNATURE B{ 27 76 117 97 }
@@ -207,7 +207,7 @@ STRUCT: lua_Debug
 : luaL_getn ( L i -- int ) lua_objlen ; inline
 : luaL_setn ( L i j -- ) 3drop ; inline
  
-CONSTANT: LUA_ERRFILE $[ $ LUA_ERRERR 1 + ]
+: LUA_ERRFILE ( -- x ) LUA_ERRERR 1 + ;
 
 STRUCT: luaL_Reg
     { name char*         }