diff options
Diffstat (limited to 'Logic.icl')
-rw-r--r-- | Logic.icl | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -83,9 +83,8 @@ where = row_b +++ join row_s [pad_right head len \\ head <- map toString exprs & len <- padlens] +++ row_e +++ line_b +++ join line_s [toString (repeatn len '-') \\ len <- padlens] +++ line_e +++ foldr (+++) "" [row_b +++ join row_s [pad_right (toStringOrEmpty val) len \\ val <- map (eval o substitute_all options`) exprs & len <- padlens] +++ row_e \\ options` <- options] - //= foldr (+++) "" (map toString padlens) where - row_b = " " + row_b = " " // Row / Line begin, end, separator row_e = " \n" row_s = " | " line_b = "-" @@ -102,7 +101,7 @@ where instance < Op1 where - (<) Not Not = False // this doesn't make much sense, but whatever + (<) Not Not = False instance == Op2 where |