From ac2c242ce594f3372b0ba05a90c248269dc187fd Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Tue, 29 Nov 2016 23:59:30 +0100
Subject: Minor improvement

---
 iclean.icl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'iclean.icl')

diff --git a/iclean.icl b/iclean.icl
index 48dcf35..d7d73d8 100644
--- a/iclean.icl
+++ b/iclean.icl
@@ -168,7 +168,6 @@ writemodule stat s w
 # f = f <<< "module " <<< temp_module <<< "\n"
 # f = f <<< join "\n" stat.memory
 # f = f <<< "start = " <<< s <<< "\n"
-		<<< "rslt = genShow{|*|} \"\" True start []\n"
 		<<< "Start = " <<< start
 # (ok,w) = fclose f w
 | not ok = abort ("Couldn't close " +++ temp_file +++ "\n")
@@ -181,7 +180,7 @@ where
 		(False, False) = "()"
 	where
 		type = "toString (typeCodeOfDynamic (dynamic start))"
-		rslt = "foldl (+++) \"\" rslt"
+		rslt = "foldl (+++) \"\" (genShow{|*|} \"\" True start [])"
 
 // C functions
 compile :: !String !String !*World -> *(!Int,!*World)
-- 
cgit v1.2.3