Added strictness annotations

1 files changed, 7 insertions, 0 deletions

diff --git a/interpreter/print.c b/interpreter/print.c
index c60c190..3f17475 100644
--- a/interpreter/print.c
+++ b/interpreter/print.c
@@ -15,6 +15,7 @@ void print_token(token* tk) {
 		case TOKEN_CLOSE_SQ:  c = ']'; break;
 		case TOKEN_EQUALS:    c = '='; break;
 		case TOKEN_COMMA:     c = ','; break;
+		case TOKEN_STRICT:    c = '!'; break;
 		case TOKEN_CODE:
 			printf("code ");
 			return;
@@ -37,6 +38,12 @@ void print_token_list(token_list* list) {
 }
 
 void print_expression(expression* expr) {
+	if (!expr)
+		return;
+
+	if (expr->is_strict)
+		printf("!");
+
 	switch (expr->kind) {
 		case EXPR_INT:
 			printf("%d", *((int*) expr->var1));