Commits

jas43 committed 9d74055

flu-style binding to luaL_loadstring.

Comments (0)

Files changed (1)

LuaFortran/flu_binding.f90

   public :: flu_pushinteger, flu_pushnil, flu_pushnumber
   public :: flu_pushvalue
 
-  public :: fluL_loadfile, fluL_newstate, fluL_openlibs
+  public :: fluL_loadfile, fluL_newstate, fluL_openlibs, fluL_loadstring
 
   interface flu_pushnumber
     module procedure flu_pushreal
   end function fluL_loadfile
 
 
+  function fluL_loadstring(L, string) result(errcode)
+    type(flu_State) :: L
+    character(len=*) :: string
+    integer :: errcode
+
+    character(len=len_trim(string)+1) :: c_string
+    integer(kind=c_int) :: c_errcode
+
+    c_string = trim(string) // c_null_char
+    write (6,*) 'c_str:', c_string
+    c_errcode = luaL_loadstring(L%state, c_string)
+    errcode = c_errcode
+
+  end function fluL_loadstring
+
+
   function fluL_newstate() result(new_state)
     type(flu_State) :: new_state
 
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.