Implement ⎕SERIAL

1 files changed, 3 insertions, 2 deletions

diff --git a/symbol.c b/symbol.c
index 2f5165b..029ab0c 100644
--- a/symbol.c
+++ b/symbol.c
@@ -148,9 +148,10 @@ pushdfnframe(Rune *code, DfnFrame *scope, Datum *lefto, Datum *righto, Array *le
 		new->left->array = left;
 		incarrayref(left);
 	}else
-		new->left = nil;
+		new->left = nil;	
 	new->right = right;
-	incarrayref(right);
+	if(right)
+		incarrayref(right);
 	new->prev = td->currentdfn;
 	new->chain = scope;
 	new->errorguards = nil;