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

object oriented programming

Browse source
This commit is contained in:
Daniella / Tove 2022-04-16 00:10:51 +02:00
parent 95da50a02a
commit 8ca9e13cad
2 changed files with 21 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
bootstrap/ISBPL.java
View file

@ -859,6 +859,18 @@ public class ISBPL {
addFunction(s, (ISBPLCallable) callable.object);
};
break;
case "defmethod":
func = (stack) -> {
ISBPLObject type = stack.pop();
ISBPLObject callable = stack.pop();
ISBPLObject str = stack.pop();
type.checkType(getType("int"));
callable.checkType(getType("func"));
ISBPLType t = types.get((int) type.object);
String s = toJavaString(str);
t.methods.put(s, (ISBPLCallable) callable.object);
};
break;
default:
func = natives.get(name);
break;
@ -1017,6 +1029,13 @@ public class ISBPL {
i = keyword.call(i, words, fileStack.get().peek(), stack);
continue;
}
if(stack.size() > 0) {
ISBPLType type = stack.peek().type;
if(type.methods.containsKey(word)) {
type.methods.get(word).call(stack);
continue;
}
}
ISBPLCallable func = functionStack.get().peek().get(word);
if(func != null) {
func.call(stack);
@ -1181,6 +1200,7 @@ class ISBPLType {
static int gid = -2;
int id = gid++;
String name;
HashMap<String, ISBPLCallable> methods = new HashMap<>();
public ISBPLType(String name) {
this.name = name;

1
std.isbpl
View file

@ -65,6 +65,7 @@ native ^
native fcall
native def
native defmethod
func ++ { 1 + }
func -- { 1 - }