wip: printer

2026-08-21 15:01:31 -06:00
parent 6ff01a8607
commit b234a52d4b
40 changed files with 341 additions and 221 deletions
@@ -0,0 +1,5 @@
+[ SynNone :< SimpleF ( SimpleBoolean True )
+, SynNone :< SimpleF ( SimpleBoolean True )
+, SynNone :< SimpleF ( SimpleBoolean False )
+, SynNone :< SimpleF ( SimpleBoolean False )
+]
@@ -0,0 +1 @@
+#t #true #f #false
@@ -0,0 +1,9 @@
+[ SynNone :< SimpleF
+    ( SimpleNumber 45.0 )
+, SynNone :< SimpleF
+    ( SimpleNumber 5667.0 )
+, SynNone :< SimpleF
+    ( SimpleNumber
+        ( -123.0 )
+    )
+]
@@ -0,0 +1 @@
+45 +5667 -123
@@ -0,0 +1,5 @@
+[ Fix
+    ( SimpleF
+        ( Symbol "aaaa bc" )
+    )
+]
@@ -0,0 +1 @@
+|aaaa bc|
@@ -0,0 +1 @@
+[]
@@ -0,0 +1,17 @@
+[ SynNone :< CompoundF
+    ( DotListF
+        (
+            ( SynNone :< SimpleF
+                ( SimpleSymbol "가" )
+            ) :|
+            [ SynNone :< SimpleF
+                ( SimpleSymbol "나" )
+            , SynNone :< SimpleF
+                ( SimpleSymbol "다" )
+            ]
+        )
+        ( SynNone :< SimpleF
+            ( SimpleSymbol "라" )
+        )
+    )
+]
@@ -0,0 +1 @@
+(가 나 다 . 라)
@@ -0,0 +1,19 @@
+[ SynNone :< CompoundF
+    ( ListF Ordinary
+        [ SynNone :< SimpleF
+            ( SimpleSymbol "가" )
+        , SynNone :< SimpleF
+            ( SimpleSymbol "나" )
+        , SynNone :< SimpleF
+            ( SimpleSymbol "다" )
+        , SynNone :< SimpleF
+            ( SimpleSymbol "라" )
+        , SynNone :< SimpleF
+            ( SimpleNumber 1.0 )
+        , SynNone :< SimpleF
+            ( SimpleNumber 2.0 )
+        , SynNone :< SimpleF
+            ( SimpleNumber 3.0 )
+        ]
+    )
+]
@@ -0,0 +1 @@
+(가 나 다 라 1 2 3)
@@ -0,0 +1,40 @@
+[ SynNone :< CompoundF
+    ( DotListF
+        (
+            ( SynNone :< SimpleF
+                ( SimpleSymbol "a" )
+            ) :|
+            [ SynNone :< SimpleF
+                ( SimpleSymbol "b" )
+            , SynNone :< CompoundF
+                ( ListF Ordinary
+                    [ SynNone :< SimpleF
+                        ( SimpleSymbol "c" )
+                    , SynNone :< SimpleF
+                        ( SimpleSymbol "d" )
+                    ]
+                )
+            ]
+        )
+        ( SynNone :< CompoundF
+            ( ListF Ordinary
+                [ SynNone :< SimpleF
+                    ( SimpleSymbol "가" )
+                , SynNone :< CompoundF
+                    ( DotListF
+                        (
+                            ( SynNone :< SimpleF
+                                ( SimpleSymbol "나" )
+                            ) :| []
+                        )
+                        ( SynNone :< SimpleF
+                            ( SimpleSymbol "다" )
+                        )
+                    )
+                , SynNone :< SimpleF
+                    ( SimpleSymbol "라" )
+                ]
+            )
+        )
+    )
+]
@@ -0,0 +1 @@
+(a b (c d) . (가 (나 . 다) 라))
@@ -0,0 +1,5 @@
+[ SynNone :< SimpleF
+    ( SimpleSymbol "+" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "-" )
+]
@@ -0,0 +1 @@
+ -
@@ -0,0 +1,5 @@
+[ Fix
+    ( SimpleF
+        ( String "가나다라마바" )
+    )
+]
@@ -0,0 +1,2 @@
+"가나다\
+      라마바"
@@ -0,0 +1,3 @@
+[ SynNone :< SimpleF
+    ( SimpleString "가나다라" )
+]
@@ -0,0 +1 @@
+"가나다라"
@@ -0,0 +1,19 @@
+[ SynNone :< SimpleF
+    ( SimpleSymbol "abc" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "bala-hwa$" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "x!!!" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "z" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "z123" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "나는너무졸리다" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "學" )
+, SynNone :< SimpleF
+    ( SimpleSymbol "車室." )
+, SynNone :< SimpleF
+    ( SimpleSymbol "三個女人一臺戲。" )
+]
@@ -0,0 +1,5 @@
+abc bala-hwa$ x!!! z z123 나는너무졸리다 學
+
+車室.
+
+三個女人一臺戲。