r7rs datum ast

2026-08-20 21:53:32 -06:00
1 changed files with 3 additions and 3 deletions
@@ -25,9 +25,9 @@ data DatumF a
 data Simple
  = SimpleBool Bool
  | SimpleNumber Scientific
-  | SimpleChar Char
-  | SimpleString Text
-  | SimpleSymbol Text
+  | SimpleChar
+  | SimpleString
+  | SimpleSymbol
  | SimpleBytevector ByteString
  deriving stock (Show, Eq, Data, Generic, Lift)
  deriving anyclass (NFData)