summaryrefslogtreecommitdiff
path: root/src/interpreter.c
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--src/interpreter.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/interpreter.c b/src/interpreter.c
index 273d985..982108e 100644
--- a/src/interpreter.c
+++ b/src/interpreter.c
@@ -62,8 +62,8 @@ next:
break;
}
case EnterTape: {
- memcpy(&tape, tape_ptr(tape), sizeof(Tape*));
stack_push(&tape_stack, tape);
+ memcpy(&tape, tape_ptr(tape), sizeof(Tape*));
break;
}
case LeaveTape: {
@@ -82,6 +82,9 @@ next:
case Clear:
printf("\033c");
break;
+ case Zero:
+ memset(tape_ptr(tape), 0, tape_get(tape));
+ break;
case Eof:
goto end;
}