tricu

commit 5523d5acdeec0896871d35bbdc1a181d819469f3
parent f478a7d0910d2ca767fe307b994ea7079e64e0b7
Author: James Eversole <james@eversole.co>
Date:   Wed,  1 Jan 2025 19:40:12 -0600

Use better default output form in evaluator

Diffstat:
M
README.md
 | 
4
++--
M
src/Main.hs
 | 
6
+++---

2 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/README.md b/README.md
@@ -75,8 +75,8 @@ tricu eval [OPTIONS]
 
   -f --file=FILE  Input file path(s) for evaluation.
                     Defaults to stdin.
-  -t --form=FORM  Optional output form: (fsl|tree|ast|ternary|ascii).
-                    Defaults to fsl "Fork Stem Leaf" form.
+  -t --form=FORM  Optional output form: (tree|fsl|ast|ternary|ascii).
+                    Defaults to tricu-compatible `t` tree form.
 
 tricu decode [OPTIONS]
   Decode a Tree Calculus value into a string representation.
diff --git a/src/Main.hs b/src/Main.hs
@@ -30,9 +30,9 @@ evaluateMode = Evaluate
   { file = def &= help "Input file path(s) for evaluation.\n \
       \ Defaults to stdin."
       &= name "f" &= typ "FILE"
-    , form = FSL &= typ "FORM"
-      &= help "Optional output form: (fsl|tree|ast|ternary|ascii).\n \
-      \ Defaults to fsl \"Fork Stem Leaf\" form."
+    , form = TreeCalculus &= typ "FORM"
+      &= help "Optional output form: (tree|fsl|ast|ternary|ascii).\n \
+      \ Defaults to tricu-compatible `t` tree form."
       &= name "t"
   }
   &= help "Evaluate tricu and return the result of the final expression."