comparison src/luan/lib/BasicLib.java @ 73:f86e4f77ef32

add package module git-svn-id: https://luan-java.googlecode.com/svn/trunk@74 21e917c8-12df-6dd8-5cb6-c86387c605b9
author fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
date Tue, 12 Feb 2013 09:46:45 +0000
parents 177cfdc2bdb3
children aa7538ae5fb6
comparison
equal deleted inserted replaced
72:cd9dbd7477ca 73:f86e4f77ef32
19 import luan.interp.LuanCompiler; 19 import luan.interp.LuanCompiler;
20 20
21 21
22 public final class BasicLib { 22 public final class BasicLib {
23 23
24 public static void register(LuanState luan) { 24 public static final String NAME = "basic";
25 LuanTable global = luan.global(); 25
26 global.put( "_G", global ); 26 public static final LuanFunction LOADER = new LuanFunction() {
27 try { 27 public Object[] call(LuanState luan,Object[] args) throws LuanException {
28 global.put( "assert", new LuanJavaFunction(BasicLib.class.getMethod("assert_",LuanState.class,Object.class,String.class),null) ); 28 LuanTable global = luan.global;
29 add( global, "assert_boolean", LuanState.class, Boolean.TYPE ); 29 global.put( "_G", global );
30 add( global, "assert_nil", LuanState.class, Object.class ); 30 try {
31 add( global, "assert_number", LuanState.class, Number.class ); 31 global.put( "assert", new LuanJavaFunction(BasicLib.class.getMethod("assert_",LuanState.class,Object.class,String.class),null) );
32 add( global, "assert_string", LuanState.class, String.class ); 32 add( global, "assert_boolean", LuanState.class, Boolean.TYPE );
33 add( global, "assert_table", LuanState.class, LuanTable.class ); 33 add( global, "assert_nil", LuanState.class, Object.class );
34 add( global, "do_file", LuanState.class, String.class ); 34 add( global, "assert_number", LuanState.class, Number.class );
35 add( global, "error", LuanState.class, Object.class ); 35 add( global, "assert_string", LuanState.class, String.class );
36 add( global, "get_metatable", LuanState.class, Object.class ); 36 add( global, "assert_table", LuanState.class, LuanTable.class );
37 add( global, "ipairs", LuanTable.class ); 37 add( global, "do_file", LuanState.class, String.class );
38 add( global, "load", LuanState.class, String.class, String.class ); 38 add( global, "error", LuanState.class, Object.class );
39 add( global, "load_file", LuanState.class, String.class ); 39 add( global, "get_metatable", LuanState.class, Object.class );
40 add( global, "pairs", LuanTable.class ); 40 add( global, "ipairs", LuanTable.class );
41 add( global, "print", LuanState.class, new Object[0].getClass() ); 41 add( global, "load", LuanState.class, String.class, String.class );
42 add( global, "raw_equal", Object.class, Object.class ); 42 add( global, "load_file", LuanState.class, String.class );
43 add( global, "raw_get", LuanTable.class, Object.class ); 43 add( global, "pairs", LuanTable.class );
44 add( global, "raw_len", LuanState.class, Object.class ); 44 add( global, "print", LuanState.class, new Object[0].getClass() );
45 add( global, "raw_set", LuanTable.class, Object.class, Object.class ); 45 add( global, "raw_equal", Object.class, Object.class );
46 add( global, "set_metatable", LuanTable.class, LuanTable.class ); 46 add( global, "raw_get", LuanTable.class, Object.class );
47 add( global, "to_number", Object.class, Integer.class ); 47 add( global, "raw_len", LuanState.class, Object.class );
48 add( global, "to_string", LuanState.class, Object.class ); 48 add( global, "raw_set", LuanTable.class, Object.class, Object.class );
49 add( global, "type", Object.class ); 49 add( global, "set_metatable", LuanTable.class, LuanTable.class );
50 global.put( "_VERSION", Luan.version ); 50 add( global, "to_number", Object.class, Integer.class );
51 51 add( global, "to_string", LuanState.class, Object.class );
52 add( global, "make_standard", LuanState.class ); 52 add( global, "type", Object.class );
53 } catch(NoSuchMethodException e) { 53 global.put( "_VERSION", Luan.version );
54 throw new RuntimeException(e); 54
55 } 55 add( global, "make_standard", LuanState.class );
56 } 56 } catch(NoSuchMethodException e) {
57 throw new RuntimeException(e);
58 }
59 return LuanFunction.EMPTY_RTN;
60 }
61 };
57 62
58 private static void add(LuanTable t,String method,Class<?>... parameterTypes) throws NoSuchMethodException { 63 private static void add(LuanTable t,String method,Class<?>... parameterTypes) throws NoSuchMethodException {
59 t.put( method, new LuanJavaFunction(BasicLib.class.getMethod(method,parameterTypes),null) ); 64 t.put( method, new LuanJavaFunction(BasicLib.class.getMethod(method,parameterTypes),null) );
60 } 65 }
61 66
62 public static void make_standard(LuanState luan) { 67 public static void make_standard(LuanState luan) {
63 LuanTable global = luan.global(); 68 LuanTable global = luan.global;
64 global.put( "dofile", global.get("do_file") ); 69 global.put( "dofile", global.get("do_file") );
65 global.put( "getmetatable", global.get("get_metatable") ); 70 global.put( "getmetatable", global.get("get_metatable") );
66 global.put( "loadfile", global.get("load_file") ); 71 global.put( "loadfile", global.get("load_file") );
67 global.put( "rawequal", global.get("raw_equal") ); 72 global.put( "rawequal", global.get("raw_equal") );
68 global.put( "rawget", global.get("raw_get") ); 73 global.put( "rawget", global.get("raw_get") );