Really messing around with trivia, it's not good yet

It's really not clear how to track it and how to compose it with
groups yet. Really very difficult.

harness.py

@@ -543,12 +543,12 @@ class Harness:
 
             case wadler.Text(start, end):
                 if self.source is not None:
-                    append(f"< {self.source[start:end]}")
+                    append(f"< {repr(self.source[start:end])}")
                 else:
                     append(f"< ??? {start}:{end}")
 
             case wadler.Literal(text):
-                append(f"' {text}")
+                append(f"literal {repr(text)}")
 
             case wadler.Group():
                 append("group")