File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change 33** Linguagem para Usuarios de Aplicacao
44*/
55
6- char * rcs_lua = "$Id: lua.c,v 1.15 1997/04/04 22:24:51 roberto Exp roberto $" ;
6+ char * rcs_lua = "$Id: lua.c,v 1.16 1997/06/09 17:29:16 roberto Exp roberto $" ;
77
88#include <stdio.h>
99#include <string.h>
@@ -56,7 +56,7 @@ static void testC (void)
5656
5757 case 'r' : { int n = getnum (s ); reg [n ] = lua_getref (locks [getnum (s )]); break ; }
5858
59- case 'u' : lua_unlock (locks [getnum (s )]); break ;
59+ case 'u' : lua_unref (locks [getnum (s )]); break ;
6060
6161 case 'p' : { int n = getnum (s ); reg [n ] = lua_getparam (getnum (s )); break ; }
6262
Original file line number Diff line number Diff line change 33** String library to LUA
44*/
55
6- char * rcs_strlib = "$Id: strlib.c,v 1.42 1997/06/16 20:29:59 roberto Exp roberto $" ;
6+ char * rcs_strlib = "$Id: strlib.c,v 1.43 1997/06/18 20:15:47 roberto Exp roberto $" ;
77
88#include <string.h>
99#include <stdio.h>
@@ -94,7 +94,7 @@ static void str_sub (void)
9494 addnchar (s + start - 1 , end - start + 1 );
9595 lua_pushstring (luaI_addchar (0 ));
9696 }
97- else lua_pushliteral ("" );
97+ else lua_pushstring ("" );
9898}
9999
100100/*
You can’t perform that action at this time.
0 commit comments