From 8578faf533ef5ed200b722ebc8551f32ace3a5cf Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Sun, 7 Jan 2018 17:12:34 +0100 Subject: Cleanup code --- assignment-13/uFPL/Bootstrap.icl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'assignment-13/uFPL/Bootstrap.icl') diff --git a/assignment-13/uFPL/Bootstrap.icl b/assignment-13/uFPL/Bootstrap.icl index 1ca75ac..4429cf5 100644 --- a/assignment-13/uFPL/Bootstrap.icl +++ b/assignment-13/uFPL/Bootstrap.icl @@ -7,7 +7,6 @@ import StdString from Data.Func import $ -import uFPL.Arduino import uFPL.C import uFPL @@ -127,9 +126,9 @@ where "bool " +++ short +++ "dirty(struct " +++ short +++ "share *share) {" +: " if (share->dirty) {" +: " share->dirty--;" +: - " return 1;" +: + " return true;" +: " }" +: - " return 0;" +: + " return false;" +: "}" instance zero CProg where zero = {bootstrap=rts, globals=sharesMap gen predefShares, funs=[]} -- cgit v1.2.3