UART fixes and lua.c merge

app/driver/input.c

@@ -115,8 +115,8 @@ void input_setprompt (const char *prompt) {
 ** the bool ins.run_input.
 ** -  TRUE:   it clears the UART FIFO up to EOL, doing any callback and sending
 **            the line to Lua.
-** -  FALSE:  it clears the UART FIFO doing callbacks according to the data_len /
-**            end_char break.
+** -  FALSE:  it clears the UART FIFO doing callbacks according to the data_len
+**            or end_char break.
 */
 extern void lua_input_string (const char *line, int len);
 
@@ -180,9 +180,9 @@ static bool input_readline(void) {
     } else {
       while (uart_getc(&ch)) {
         ins.data[ins.line_pos++] = ch;
-        if(  ins.line_pos >= ins.len ||
-            (ins.data_len > 0 && ins.line_pos >= ins.data_len) ||
-             ch == ins.end_char ) {
+        if( ins.line_pos >= ins.len ||
+           (ins.data_len >= 0 && ins.line_pos >= ins.data_len) ||
+           (ins.data_len  < 0 && ch == ins.end_char )) {
           ins.uart_cb(ins.data, ins.line_pos);
           ins.line_pos = 0;
         }

app/lua/lapi.c

@@ -530,9 +530,9 @@ LUA_API void lua_pushrotable (lua_State *L,  const ROTable *t) {
   lua_unlock(L);
 }
 
-LUA_API void lua_pushlightfunction(lua_State *L, void *p) {
+LUA_API void lua_pushlightfunction(lua_State *L, lua_CFunction f) {
   lua_lock(L);
-  setfvalue(L->top, p);
+  setfvalue(L->top, f);
   api_incr_top(L);
   lua_unlock(L);
 }

app/lua/lauxlib.c

@@ -900,13 +900,13 @@ LUALIB_API void luaL_assertfail(const char *file, int line, const char *message)
  * which will then sync up with the remote GDB client to allow forensics of the error.
  */
 #ifdef LUA_CROSS_COMPILER
-LUALIB_API void luaL_dbgbreak(void) {
-  puts("debug break");  /* allows BT analysis of assert fails */
+LUALIB_API void lua_debugbreak(void) {
+  puts(" lua_debugbreak ");  /* allows BT analysis of assert fails */
 }
 #else
 extern void gdbstub_init(void);
 
-LUALIB_API void luaL_dbgbreak(void) {
+LUALIB_API void lua_debugbreak(void) {
   static int repeat_entry = 0;
   if  (repeat_entry == 0) {
     dbg_printf("Start up the gdb stub if not already started\n");

app/lua/lstate.c

@@ -229,9 +229,6 @@ lua_State *lua_open(void) {
   return lua_crtstate;
 }
 
-lua_State *lua_getstate(void) {
-  return lua_crtstate;
-}
 LUA_API void lua_close (lua_State *L) {
 #ifndef LUA_CROSS_COMPILER
   lua_sethook( L, NULL, 0, 0 );

app/lua/lua.c

@@ -0,0 +1 @@
+../lua53/lua.c