diff options
Diffstat (limited to 'examples/typedlua/tlp.lua')
-rw-r--r-- | examples/typedlua/tlp.lua | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/examples/typedlua/tlp.lua b/examples/typedlua/tlp.lua new file mode 100644 index 0000000..4605751 --- /dev/null +++ b/examples/typedlua/tlp.lua | |||
@@ -0,0 +1,18 @@ | |||
1 | local tlparser = require "tlparser" | ||
2 | |||
3 | local function getcontents(filename) | ||
4 | file = assert(io.open(filename, "r")) | ||
5 | contents = file:read("*a") | ||
6 | file:close() | ||
7 | return contents | ||
8 | end | ||
9 | |||
10 | if #arg ~= 1 then | ||
11 | print ("Usage: lua tlp.lua <file>") | ||
12 | os.exit(1) | ||
13 | end | ||
14 | |||
15 | local filename = arg[1] | ||
16 | local subject = getcontents(filename) | ||
17 | |||
18 | print(tlparser.parse(subject, filename, false, true)) | ||