diff options
author | Camil Staps | 2015-07-03 13:15:54 +0200 |
---|---|---|
committer | Camil Staps | 2015-07-03 13:16:24 +0200 |
commit | 4cfd4cbbed7e93c092a44285ae519d08b587efc4 (patch) | |
tree | 69bedcf9d2b9536f84963759040b50bbe6660b01 /Logic.icl | |
parent | Cleanup (diff) |
Cleanup
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 |