repositories
/
mTask.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
shares are updated now and visible
[mTask.git]
/
client
/
interpret.c
diff --git
a/client/interpret.c
b/client/interpret.c
index
ac0c0bc
..
51e2951
100644
(file)
--- a/
client/interpret.c
+++ b/
client/interpret.c
@@
-37,8
+37,21
@@
void run_task(struct task *t)
pc++;
break;
case BCPUSH: trace("push %d", program[pc]*265+program[pc+1]);
pc++;
break;
case BCPUSH: trace("push %d", program[pc]*265+program[pc+1]);
- stack[sp++] = f16(pc);
- pc+=2;
+ switch(program[pc++]){
+ //Long
+ case 'l':
+ //Int
+ case 'i':
+ stack[sp++] = f16(pc);
+ pc+=2;
+ break;
+ case 'b': //Bool
+ case 'c': //Character
+ case 'B': //Button
+ case 'L': //UserLED
+ stack[sp++] = program[pc++];
+ break;
+ }
break;
case BCPOP: trace("pop");
sp--;
break;
case BCPOP: trace("pop");
sp--;