Mercurial Hosting > luan

comparison core/src/luan/modules/Luan.luan @ 503:92c3d22745b8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
make _ENV optional
author Franklin Schmidt <fschmidt@gmail.com>
date Wed, 20 May 2015 23:24:46 -0600
parents 7e9fcfbf22ec
children 9218f9cf45d3
comparison
equal deleted inserted replaced
502:d3183a330ff5 503:92c3d22745b8
1 java() 1 java()
2 local BasicLuan = require "java:luan.modules.BasicLuan" 2 local BasicLuan = require "java:luan.modules.BasicLuan"
3 3
4 assert_binary = BasicLuan.assert_binary 4 local M = {}
5 assert_boolean = BasicLuan.assert_boolean
6 assert_integer = BasicLuan.assert_integer
7 assert_long = BasicLuan.assert_long
8 assert_number = BasicLuan.assert_number
9 assert_string = BasicLuan.assert_string
10 assert_table = BasicLuan.assert_table
11 get_metatable = BasicLuan.get_metatable
12 ipairs = BasicLuan.ipairs
13 load = BasicLuan.load
14 load_file = BasicLuan.load_file
15 new_error = BasicLuan.new_error
16 pairs = BasicLuan.pairs
17 pcall = BasicLuan.pcall
18 range = BasicLuan.range
19 raw_equal = BasicLuan.raw_equal
20 raw_get = BasicLuan.raw_get
21 raw_len = BasicLuan.raw_len
22 raw_set = BasicLuan.raw_set
23 set_metatable = BasicLuan.set_metatable
24 to_string = BasicLuan.to_string
25 try = BasicLuan.try_
26 type = BasicLuan.type
27 values = BasicLuan.values
28 5
29 function do_file(uri) 6 M.assert_binary = BasicLuan.assert_binary
30 return load_file(uri)() 7 M.assert_boolean = BasicLuan.assert_boolean
8 M.assert_integer = BasicLuan.assert_integer
9 M.assert_long = BasicLuan.assert_long
10 M.assert_number = BasicLuan.assert_number
11 M.assert_string = BasicLuan.assert_string
12 M.assert_table = BasicLuan.assert_table
13 M.get_metatable = BasicLuan.get_metatable
14 M.ipairs = BasicLuan.ipairs
15 M.load = BasicLuan.load
16 M.load_file = BasicLuan.load_file
17 M.new_error = BasicLuan.new_error
18 M.pairs = BasicLuan.pairs
19 M.pcall = BasicLuan.pcall
20 M.range = BasicLuan.range
21 M.raw_equal = BasicLuan.raw_equal
22 M.raw_get = BasicLuan.raw_get
23 M.raw_len = BasicLuan.raw_len
24 M.raw_set = BasicLuan.raw_set
25 M.set_metatable = BasicLuan.set_metatable
26 M.to_string = BasicLuan.to_string
27 M.try = BasicLuan.try_
28 M.type = BasicLuan.type
29 M.values = BasicLuan.values
30
31 function M.do_file(uri)
32 return M.load_file(uri)()
31 end 33 end
32 34
33 VERSION = do_file "classpath:luan/version.luan" 35 M.VERSION = M.do_file "classpath:luan/version.luan"
34 36
35 local new_error = new_error 37 function M.error(message)
36 38 M.new_error(message).throw()
37 function error(message)
38 new_error(message).throw()
39 end 39 end
40 40
41 local error = error 41 function M.assert(v,message)
42 return v or M.error(message or "assertion failed!")
43 end
42 44
43 function assert(v,message) 45 return M
44 return v or error(message or "assertion failed!")
45 end