TudbuT/isbpl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add some more dumping stuff to natives

Browse source
This commit is contained in:
Daniella / Tove 2022-03-07 18:02:48 +01:00
parent 91b05d9f3d
commit f377560e21
1 changed files with 21 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
bootstrap/ISBPL.java
View file

@ -780,6 +780,27 @@ public class ISBPL {
stack.push(new ISBPLObject(getType("int"), 0)); stack.push(new ISBPLObject(getType("int"), 0));
}; };
break; break;
case "_getvars":
func = (File file) -> {
ISBPLObject[] objects = new ISBPLObject[functionStack.size()];
int i = 0;
for (HashMap<String, ISBPLCallable> map : functionStack) {
ArrayList<ISBPLObject> strings = new ArrayList<>();
for (String key : map.keySet()) {
if(key.startsWith("=")) {
strings.add(toISBPLString(key.substring(1)));
}
}
objects[i++] = new ISBPLObject(getType("array"), strings.toArray(new ISBPLObject[0]));
}
ISBPLObject array = new ISBPLObject(getType("array"), objects);
};
break;
case "stacksize":
func = (File file) -> {
stack.push(new ISBPLObject(getType("int"), stack.size()));
};
break;
} }
functionStack.peek().put(name, func); functionStack.peek().put(name, func);
} }