repo/luan: core/src/luan/LuanTable.java annotate

annotate core/src/luan/LuanTable.java @ 433:c6bcb8859b93

make LuanState.registry a Map; remove generics from DeepCloneable; add Map support to DeepCloner;

author	Franklin Schmidt <fschmidt@gmail.com>
date	Sun, 03 May 2015 15:45:39 -0600
parents	d9df6d6cb927
children	472fc70853cd

rev	line source
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	1 package luan;
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	2
27 9de9be530625 minor fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 19 diff changeset	3 import java.util.Iterator;
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	4 import java.util.ListIterator;
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	5 import java.util.Map;
222 b76fcb72d97d add AbstractLuanTable and improve HttpLuan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 221 diff changeset	6 import java.util.AbstractMap;
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	7 import java.util.LinkedHashMap;
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	8 import java.util.List;
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	9 import java.util.ArrayList;
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	10 import java.util.Collections;
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	11 import java.util.Comparator;
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	12 import java.util.Set;
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	13 import java.util.HashSet;
72 cd9dbd7477ca prevent stack overflow when printing table with circular references fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 66 diff changeset	14 import java.util.IdentityHashMap;
88 6ca02b188dba add LuanBit to clean up code; fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 86 diff changeset	15 import java.util.regex.Pattern;
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	16
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	17
433 c6bcb8859b93 make LuanState.registry a Map; Franklin Schmidt <fschmidt@gmail.com> parents: 432 diff changeset	18 public final class LuanTable implements DeepCloneable {
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	19 private Map<Object,Object> map = null;
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	20 private List<Object> list = null;
48 64ecb7a3aad7 rename Lua to Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 47 diff changeset	21 private LuanTable metatable = null;
300 9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	22 private boolean hasJava = false;
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	23
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	24 public LuanTable() {}
364 1a464e090538 simplify table code Franklin Schmidt <fschmidt@gmail.com> parents: 355 diff changeset	25
411 23b99a5039b5 remove Luan.newTable() Franklin Schmidt <fschmidt@gmail.com> parents: 408 diff changeset	26 public LuanTable(List<Object> list) {
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	27 int n = list.size();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	28 for( int i=0; i<n; i++ ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	29 Object val = list.get(i);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	30 if( val != null )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	31 rawPut(i+1,val);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	32 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	33 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	34
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	35 public LuanTable(Map<Object,Object> map) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	36 for( Map.Entry<Object,Object> entry : map.entrySet() ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	37 Object key = entry.getKey();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	38 Object value = entry.getValue();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	39 if( key != null && value != null )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	40 rawPut(key,value);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	41 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	42 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	43
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	44 public LuanTable(Set<Object> set) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	45 for( Object el : set ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	46 if( el != null )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	47 rawPut(el,Boolean.TRUE);
118 735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	48 }
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	49 }
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	50
425 0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	51 public LuanTable(LuanTable tbl) {
0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	52 if( tbl.map != null && !tbl.map.isEmpty() )
0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	53 this.map = new LinkedHashMap<Object,Object>(tbl.map);
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	54 if( tbl.rawLength() > 0 )
425 0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	55 this.list = new ArrayList<Object>(tbl.list);
0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	56 this.metatable = tbl.metatable;
0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	57 }
0a2fb80907f9 minor LuanTable cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 423 diff changeset	58
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	59 @Override public LuanTable shallowClone() {
1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	60 return new LuanTable();
77 4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	61 }
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	62
433 c6bcb8859b93 make LuanState.registry a Map; Franklin Schmidt <fschmidt@gmail.com> parents: 432 diff changeset	63 @Override public void deepenClone(DeepCloneable dc,DeepCloner cloner) {
c6bcb8859b93 make LuanState.registry a Map; Franklin Schmidt <fschmidt@gmail.com> parents: 432 diff changeset	64 LuanTable clone = (LuanTable)dc;
77 4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	65 if( map != null ) {
284 8870840251ea use LinkedHashMap in LuanTable to preserve order fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 233 diff changeset	66 clone.map = newMap();
77 4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	67 for( Map.Entry<Object,Object> entry : map.entrySet() ) {
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	68 clone.map.put( cloner.get(entry.getKey()), cloner.get(entry.getValue()) );
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	69 }
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	70 }
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	71 if( list != null ) {
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	72 clone.list = new ArrayList<Object>();
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	73 for( Object obj : list ) {
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	74 clone.list.add( cloner.get(obj) );
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	75 }
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	76 }
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	77 if( metatable != null )
433 c6bcb8859b93 make LuanState.registry a Map; Franklin Schmidt <fschmidt@gmail.com> parents: 432 diff changeset	78 clone.metatable = (LuanTable)cloner.get(metatable);
300 9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	79 clone.hasJava = hasJava;
77 4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	80 }
4bf3d0c0b6b9 make LuanState cloneable fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 72 diff changeset	81
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	82 public boolean isList() {
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	83 return map==null \|\| map.isEmpty();
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	84 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	85
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	86 public List<Object> asList() {
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	87 return list!=null ? list : Collections.emptyList();
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	88 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	89
430 f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	90 public String toString(LuanState luan) throws LuanException {
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	91 Object h = getHandler("__to_string");
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	92 if( h == null )
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	93 return rawToString();
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	94 if( h instanceof LuanMeta ) {
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	95 LuanMeta meta = (LuanMeta)h;
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	96 return meta.__to_string(luan,this);
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	97 }
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	98 LuanFunction fn = luan.checkFunction(h);
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	99 return luan.checkString( Luan.first( luan.call(fn,"__to_string",new Object[]{this}) ) );
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	100 }
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	101
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	102 public String rawToString() {
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	103 return "table: " + Integer.toHexString(hashCode());
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	104 }
f28320fd671d fix LuanTable.toString() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 428 diff changeset	105
426 23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	106 public Object get(LuanState luan,Object key) throws LuanException {
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	107 Object value = rawGet(key);
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	108 if( value != null )
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	109 return value;
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	110 Object h = getHandler("__index");
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	111 if( h==null )
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	112 return null;
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	113 if( h instanceof LuanFunction ) {
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	114 LuanFunction fn = (LuanFunction)h;
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	115 return Luan.first(luan.call(fn,"__index",new Object[]{this,key}));
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	116 }
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	117 if( h instanceof LuanMeta ) {
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	118 LuanMeta meta = (LuanMeta)h;
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	119 return meta.__index(luan,this,key);
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	120 }
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	121 if( h instanceof LuanTable ) {
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	122 LuanTable tbl = (LuanTable)h;
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	123 return tbl.get(luan,key);
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	124 }
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	125 throw luan.exception("invalid type "+Luan.type(h)+" for metamethod __index");
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	126 }
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	127
23a93c118042 fix LuanTable.get() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 425 diff changeset	128 public Object rawGet(Object key) {
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	129 if( list != null ) {
48 64ecb7a3aad7 rename Lua to Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 47 diff changeset	130 Integer iT = Luan.asInteger(key);
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	131 if( iT != null ) {
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	132 int i = iT - 1;
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	133 if( i>=0 && i<list.size() )
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	134 return list.get(i);
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	135 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	136 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	137 if( map==null )
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	138 return null;
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	139 return map.get(key);
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	140 }
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	141
427 dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	142 public void put(LuanState luan,Object key,Object value) throws LuanException {
428 df95199ca4c0 rename __newindex to __new_index Franklin Schmidt <fschmidt@gmail.com> parents: 427 diff changeset	143 Object h = getHandler("__new_index");
427 dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	144 if( h==null \|\| rawGet(key)!=null ) {
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	145 rawPut(key,value);
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	146 return;
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	147 }
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	148 if( h instanceof LuanFunction ) {
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	149 LuanFunction fn = (LuanFunction)h;
428 df95199ca4c0 rename __newindex to __new_index Franklin Schmidt <fschmidt@gmail.com> parents: 427 diff changeset	150 luan.call(fn,"__new_index",new Object[]{this,key,value});
427 dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	151 return;
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	152 }
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	153 if( h instanceof LuanMeta ) {
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	154 LuanMeta meta = (LuanMeta)h;
428 df95199ca4c0 rename __newindex to __new_index Franklin Schmidt <fschmidt@gmail.com> parents: 427 diff changeset	155 meta.__new_index(luan,this,key,value);
427 dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	156 return;
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	157 }
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	158 if( h instanceof LuanTable ) {
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	159 LuanTable tbl = (LuanTable)h;
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	160 tbl.put(luan,key,value);
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	161 return;
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	162 }
428 df95199ca4c0 rename __newindex to __new_index Franklin Schmidt <fschmidt@gmail.com> parents: 427 diff changeset	163 throw luan.exception("invalid type "+Luan.type(h)+" for metamethod __new_index");
427 dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	164 }
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	165
dae264ad6a7b fix LuanTable.put() to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 426 diff changeset	166 public void rawPut(Object key,Object val) {
48 64ecb7a3aad7 rename Lua to Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 47 diff changeset	167 Integer iT = Luan.asInteger(key);
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	168 if( iT != null ) {
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	169 int i = iT - 1;
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	170 if( list != null \|\| i == 0 ) {
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	171 if( i == list().size() ) {
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	172 if( val != null ) {
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	173 list.add(val);
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	174 mapToList();
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	175 }
224 05eb2837ddbf change LuanTable.put() to not return old value fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 222 diff changeset	176 return;
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	177 } else if( i>=0 && i<list.size() ) {
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	178 list.set(i,val);
118 735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	179 if( val == null ) {
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	180 listToMap(i);
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	181 }
224 05eb2837ddbf change LuanTable.put() to not return old value fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 222 diff changeset	182 return;
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	183 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	184 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	185 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	186 if( map==null ) {
284 8870840251ea use LinkedHashMap in LuanTable to preserve order fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 233 diff changeset	187 map = newMap();
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	188 }
46 a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	189 if( key instanceof Number && !(key instanceof Double) ) {
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	190 Number n = (Number)key;
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	191 key = Double.valueOf(n.doubleValue());
a443637829c1 remove LuaNumber fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 44 diff changeset	192 }
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	193 if( val == null ) {
224 05eb2837ddbf change LuanTable.put() to not return old value fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 222 diff changeset	194 map.remove(key);
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	195 } else {
224 05eb2837ddbf change LuanTable.put() to not return old value fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 222 diff changeset	196 map.put(key,val);
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	197 }
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	198 }
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	199
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	200 private void mapToList() {
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	201 if( map != null ) {
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	202 while(true) {
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	203 Object v = map.remove(Double.valueOf(list.size()+1));
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	204 if( v == null )
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	205 break;
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	206 list.add(v);
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	207 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	208 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	209 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	210
118 735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	211 private void listToMap(int from) {
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	212 if( list != null ) {
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	213 while( list.size() > from ) {
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	214 int i = list.size() - 1;
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	215 Object v = list.remove(i);
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	216 if( v != null ) {
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	217 if( map==null )
284 8870840251ea use LinkedHashMap in LuanTable to preserve order fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 233 diff changeset	218 map = newMap();
118 735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	219 map.put(i+1,v);
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	220 }
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	221 }
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	222 }
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	223 }
735708619119 add Debug.debug() fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 108 diff changeset	224
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	225 private List<Object> list() {
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	226 if( list == null ) {
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	227 list = new ArrayList<Object>();
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	228 mapToList();
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	229 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	230 return list;
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	231 }
659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	232
431 3ffe8ba5b297 TableLuan cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 430 diff changeset	233 public void rawInsert(int pos,Object value) {
108 3c404a296995 make Package module more standard; fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 88 diff changeset	234 if( value==null )
222 b76fcb72d97d add AbstractLuanTable and improve HttpLuan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 221 diff changeset	235 throw new IllegalArgumentException("can't insert a nil value");
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	236 list().add(pos-1,value);
108 3c404a296995 make Package module more standard; fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 88 diff changeset	237 mapToList();
3c404a296995 make Package module more standard; fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 88 diff changeset	238 }
3c404a296995 make Package module more standard; fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 88 diff changeset	239
431 3ffe8ba5b297 TableLuan cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 430 diff changeset	240 public Object rawRemove(int pos) {
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	241 return list().remove(pos-1);
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	242 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	243
431 3ffe8ba5b297 TableLuan cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 430 diff changeset	244 public void rawSort(Comparator<Object> cmp) {
47 659c7139e903 better conversion fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 46 diff changeset	245 Collections.sort(list(),cmp);
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	246 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	247
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	248 public int length(LuanState luan) throws LuanException {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	249 Object h = getHandler("__len");
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	250 if( h != null ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	251 LuanFunction fn = luan.checkFunction(h);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	252 return (Integer)Luan.first(luan.call(fn,"__len",new Object[]{this}));
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	253 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	254 return rawLength();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	255 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	256
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	257 public int rawLength() {
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	258 return list==null ? 0 : list.size();
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	259 }
2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	260
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	261 public Iterable<Map.Entry<Object,Object>> iterable(LuanState luan) throws LuanException {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	262 final Iterator<Map.Entry<Object,Object>> iter = iterator(luan);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	263 return new Iterable<Map.Entry<Object,Object>>() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	264 public Iterator<Map.Entry<Object,Object>> iterator() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	265 return iter;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	266 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	267 };
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	268 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	269
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	270 public Iterator<Map.Entry<Object,Object>> iterator(final LuanState luan) throws LuanException {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	271 if( getHandler("__pairs") == null )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	272 return rawIterator();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	273 final LuanFunction fn = pairs(luan);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	274 return new Iterator<Map.Entry<Object,Object>>() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	275 private Map.Entry<Object,Object> next = getNext();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	276
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	277 private Map.Entry<Object,Object> getNext() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	278 try {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	279 Object obj = luan.call(fn);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	280 if( obj==null )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	281 return null;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	282 Object[] a = (Object[])obj;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	283 if( a.length == 0 )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	284 return null;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	285 return new AbstractMap.SimpleEntry<Object,Object>(a[0],a[1]);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	286 } catch(LuanException e) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	287 throw new LuanRuntimeException(e);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	288 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	289 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	290
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	291 public boolean hasNext() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	292 return next != null;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	293 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	294
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	295 public Map.Entry<Object,Object> next() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	296 Map.Entry<Object,Object> rtn = next;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	297 next = getNext();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	298 return rtn;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	299 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	300
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	301 public void remove() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	302 throw new UnsupportedOperationException();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	303 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	304 };
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	305 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	306
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	307 public LuanFunction pairs(final LuanState luan) throws LuanException {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	308 Object h = getHandler("__pairs");
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	309 if( h != null ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	310 if( h instanceof LuanFunction ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	311 Object obj = Luan.first(luan.call((LuanFunction)h,"__pairs",new Object[]{this}));
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	312 if( !(obj instanceof LuanFunction) )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	313 throw luan.exception( "metamethod __pairs should return function but returned " + Luan.type(obj) );
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	314 return (LuanFunction)obj;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	315 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	316 if( h instanceof LuanMeta ) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	317 LuanMeta meta = (LuanMeta)h;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	318 return meta.__pairs(luan,this);
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	319 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	320 throw luan.exception( "invalid type of metamethod __pairs: " + Luan.type(h) );
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	321 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	322 return rawPairs();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	323 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	324
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	325 private LuanFunction rawPairs() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	326 return new LuanFunction() {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	327 final Iterator<Map.Entry<Object,Object>> iter = rawIterator();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	328
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	329 @Override public Object[] call(LuanState luan,Object[] args) {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	330 if( !iter.hasNext() )
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	331 return LuanFunction.NOTHING;
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	332 Map.Entry<Object,Object> entry = iter.next();
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	333 return new Object[]{entry.getKey(),entry.getValue()};
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	334 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	335 };
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	336 }
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	337
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	338 public Iterator<Map.Entry<Object,Object>> rawIterator() {
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	339 if( list == null ) {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	340 if( map == null )
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	341 return Collections.<Map.Entry<Object,Object>>emptyList().iterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	342 return map.entrySet().iterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	343 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	344 if( map == null )
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	345 return listIterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	346 return new Iterator<Map.Entry<Object,Object>>() {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	347 Iterator<Map.Entry<Object,Object>> iter = listIterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	348 boolean isList = true;
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	349
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	350 public boolean hasNext() {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	351 boolean b = iter.hasNext();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	352 if( !b && isList ) {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	353 iter = map.entrySet().iterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	354 isList = false;
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	355 b = iter.hasNext();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	356 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	357 return b;
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	358 }
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	359
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	360 public Map.Entry<Object,Object> next() {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	361 return iter.next();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	362 }
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	363
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	364 public void remove() {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	365 throw new UnsupportedOperationException();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	366 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	367 };
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	368 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	369
221 ec016471c6eb make LuanTable an interface fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 202 diff changeset	370 private Iterator<Map.Entry<Object,Object>> listIterator() {
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	371 if( list == null )
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	372 return Collections.<Map.Entry<Object,Object>>emptyList().iterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	373 final ListIterator iter = list.listIterator();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	374 return new Iterator<Map.Entry<Object,Object>>() {
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	375
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	376 public boolean hasNext() {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	377 return iter.hasNext();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	378 }
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	379
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	380 public Map.Entry<Object,Object> next() {
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	381 Integer key = iter.nextIndex()+1;
222 b76fcb72d97d add AbstractLuanTable and improve HttpLuan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 221 diff changeset	382 return new AbstractMap.SimpleEntry<Object,Object>(key,iter.next());
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	383 }
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	384
44 57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	385 public void remove() {
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	386 throw new UnsupportedOperationException();
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	387 }
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	388 };
57054fa43189 implement table lib fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 35 diff changeset	389 }
221 ec016471c6eb make LuanTable an interface fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 202 diff changeset	390
431 3ffe8ba5b297 TableLuan cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 430 diff changeset	391 public LuanTable rawSubList(int from,int to) {
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	392 LuanTable tbl = shallowClone();
221 ec016471c6eb make LuanTable an interface fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 202 diff changeset	393 tbl.list = new ArrayList<Object>(list().subList(from-1,to-1));
ec016471c6eb make LuanTable an interface fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 202 diff changeset	394 return tbl;
27 9de9be530625 minor fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 19 diff changeset	395 }
9de9be530625 minor fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 19 diff changeset	396
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	397 public LuanTable getMetatable() {
35 e51906de0f11 implement metatables fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 27 diff changeset	398 return metatable;
e51906de0f11 implement metatables fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 27 diff changeset	399 }
e51906de0f11 implement metatables fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 27 diff changeset	400
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	401 public void setMetatable(LuanTable metatable) {
35 e51906de0f11 implement metatables fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 27 diff changeset	402 this.metatable = metatable;
e51906de0f11 implement metatables fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 27 diff changeset	403 }
300 9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	404
419 8fbb961aabd5 improve repr() to check metamethod recursively Franklin Schmidt <fschmidt@gmail.com> parents: 414 diff changeset	405 public Object getHandler(String op) {
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	406 return metatable==null ? null : metatable.rawGet(op);
419 8fbb961aabd5 improve repr() to check metamethod recursively Franklin Schmidt <fschmidt@gmail.com> parents: 414 diff changeset	407 }
8fbb961aabd5 improve repr() to check metamethod recursively Franklin Schmidt <fschmidt@gmail.com> parents: 414 diff changeset	408
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	409 public boolean hasJava() {
300 9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	410 return hasJava;
9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	411 }
9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	412
408 1b38de2b1845 merge LuanTableImpl into LuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 406 diff changeset	413 public void setJava() {
300 9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	414 hasJava = true;
9fb523472035 add java() to control java access fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: 284 diff changeset	415 }
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	416
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	417
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	418 // from AbstractLuanTable
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	419
431 3ffe8ba5b297 TableLuan cleanup Franklin Schmidt <fschmidt@gmail.com> parents: 430 diff changeset	420 private Map<Object,Object> newMap() {
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	421 return new LinkedHashMap<Object,Object>();
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	422 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	423
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	424 public boolean isSet(LuanState luan) throws LuanException {
d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	425 for( Map.Entry<Object,Object> entry : iterable(luan) ) {
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	426 if( !entry.getValue().equals(Boolean.TRUE) )
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	427 return false;
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	428 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	429 return true;
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	430 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	431
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	432 public Set<Object> asSet(LuanState luan) throws LuanException {
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	433 Set<Object> set = new HashSet<Object>();
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	434 for( Map.Entry<Object,Object> entry : iterable(luan) ) {
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	435 set.add(entry.getKey());
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	436 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	437 return set;
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	438 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	439
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	440 public Map<Object,Object> asMap(LuanState luan) throws LuanException {
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	441 Map<Object,Object> map = newMap();
432 d9df6d6cb927 finish fixing LuanTable to use metatables Franklin Schmidt <fschmidt@gmail.com> parents: 431 diff changeset	442 for( Map.Entry<Object,Object> entry : iterable(luan) ) {
406 9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	443 map.put(entry.getKey(),entry.getValue());
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	444 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	445 return map;
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	446 }
9321a33b9b1c remove AbstractLuanTable Franklin Schmidt <fschmidt@gmail.com> parents: 397 diff changeset	447
1 2df768b926aa start Luan fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> parents: diff changeset	448 }

Mercurial Hosting > luan

annotate core/src/luan/LuanTable.java @ 433:c6bcb8859b93