Fix for issue 10: flat printing of SCons of two SAtoms.
Kevin Quick
6 years ago
269 | 269 |
pHead SNil =
|
270 | 270 |
B.fromString "()"
|
271 | 271 |
|
| 272 |
pTail e@(SCons _ (SAtom _)) =
|
| 273 |
B.fromString " " <> pHead e <> B.fromString ")"
|
272 | 274 |
pTail (SCons x xs) =
|
273 | 275 |
B.fromString " " <> pHead x <> pTail xs
|
274 | 276 |
pTail (SAtom t) =
|