From 230aac3c644df9d80c8eba507e6bc7c710b26b52 Mon Sep 17 00:00:00 2001
From: Peter Mikkelsen <petermikkelsen10@gmail.com>
Date: Thu, 20 Jan 2022 23:07:08 +0000
Subject: Implement better dnfs semantics

---
 main.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'main.c')

diff --git a/main.c b/main.c
index ef6e948..96a6d07 100644
--- a/main.c
+++ b/main.c
@@ -30,7 +30,7 @@ main(int argc, char *argv[])
 	while(!off){
 		checkmem("main loop");
 		Rune *input = prompt(L"\t");
-		Datum *result = evalline(input);
+		Datum *result = evalline(input, 1);
 		if(result == nil){
 			if(errormsg == nil)
 				off = 1;
@@ -64,10 +64,10 @@ prompt(Rune *pr)
 }
 
 Datum *
-evalline(Rune *line)
+evalline(Rune *line, int toplevel)
 {
-	Statement *stmts = lexline(line);
-	Datum *result = eval(stmts);
+	Statement *stmts = lexline(line, toplevel);
+	Datum *result = eval(stmts, toplevel);
 	if(result)
 		return result;
 	else{
-- 
cgit v1.2.3