Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: code/trunk/src/tolua/lua/custom_hide.lua @ 3000

Last change on this file since 3000 was 2710, checked in by rgrieder, 16 years ago

Merged buildsystem3 containing buildsystem2 containing Adi's buildsystem branch back to the trunk.
Please update the media directory if you were not using buildsystem3 before.

  • Property svn:eol-style set to native
File size: 843 bytes
Line 
1-- extract code with tolua_hide, and also
2function extract_code(fn,s)
3    local code = '\n$#include "'..fn..'"\n'
4    s= "\n" .. s .. "\n" -- add blank lines as sentinels
5    local _,e,c,t = strfind(s, "\n([^\n]-)[Tt][Oo][Ll][Uu][Aa]_([^%s]*)[^\n]*\n")
6    while e do
7        t = strlower(t)
8        if t == "begin" then
9            _,e,c = strfind(s,"(.-)\n[^\n]*[Tt][Oo][Ll][Uu][Aa]_[Ee][Nn][Dd][^\n]*\n",e)
10            if not e then
11             tolua_error("Unbalanced 'tolua_begin' directive in header file")
12            end
13        end
14        c = c.."\n"
15        c = string.gsub(c, "\n[^\n]*[Tt][Oo][Ll][Uu][Aa]_[hH][iI][Dd][eE][^\n]*\n", "\n");
16        c = string.gsub(c, "#define[^%(\n]*%(.-\n", "\n")
17        code = code .. c
18     _,e,c,t = strfind(s, "\n([^\n]-)[Tt][Oo][Ll][Uu][Aa]_([^%s]*)[^\n]*\n",e)
19    end
20    return code
21end
Note: See TracBrowser for help on using the repository browser.