git.iko.soy/project-m36
on master help sign in
change terminal display of BoolAtom to match TutorialD input
f07d7cdAgentM
ProjectM36/Relation/Show/Term.hs+1−1
compare with master
unifiedsplit
@@ -95,7 +95,7 @@ showAtom :: Atom -> StringType
95showAtom (StringAtom atom) = atom
95showAtom (StringAtom atom) = atom
96showAtom (IntAtom atom) = T.pack $ show atom
96showAtom (IntAtom atom) = T.pack $ show atom
97showAtom (RelationAtom rel) = renderTable $ relationAsTable rel
97showAtom (RelationAtom rel) = renderTable $ relationAsTable rel
98−showAtom (BoolAtom bool) = T.pack $ show bool
98+showAtom (BoolAtom bool) = T.pack $ if bool then "t" else "f"
99showAtom (DateTimeAtom dt) = T.pack $ show dt
99showAtom (DateTimeAtom dt) = T.pack $ show dt
100showAtom (DateAtom d) = T.pack $ show d
100showAtom (DateAtom d) = T.pack $ show d
101showAtom (DoubleAtom d) = T.pack $ show d
101showAtom (DoubleAtom d) = T.pack $ show d