tisp

commit 7fb86eeaa1d74a202984e08b93b516a8daf6d77a
parent 04b654ea6a65210c4156225c4e89833afee79b0f
Author: Ed van Bruggen <edvb@uw.edu>
Date:   Mon, 20 Aug 2018 16:45:26 -0700

Free tisp_read input

Diffstat:
main.c
 | 
7
++++++-

1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/main.c b/main.c
@@ -19,7 +19,9 @@ char *argv0;
 static Val
 read_val(Env env, Str cmd)
 {
+	char *strf;
 	struct Str str;
+	Val ret;
 
 	if (cmd->d)
 		return tisp_read(env, cmd);
@@ -28,7 +30,10 @@ read_val(Env env, Str cmd)
 		return NULL;
 	linenoiseHistoryAdd(str.d);
 
-	return tisp_read(env, &str);
+	strf = str.d;
+	ret = tisp_read(env, &str);
+	efree(strf);
+	return ret;
 }
 
 static void