diff options
| author | Tom Smeding <tom@tomsmeding.com> | 2024-11-09 11:34:04 +0100 |
|---|---|---|
| committer | Tom Smeding <tom@tomsmeding.com> | 2024-11-09 11:34:04 +0100 |
| commit | 2b1562d33bb9496aa449ef9d52735af0ec61c15c (patch) | |
| tree | 77aa4f3195b1493828e3c82c9bae4b419ba27c64 /src/AST/Pretty.hs | |
| parent | 992249ebf159ba3783a9345430013e52294c26aa (diff) | |
Some more primitive operators
Diffstat (limited to 'src/AST/Pretty.hs')
| -rw-r--r-- | src/AST/Pretty.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/AST/Pretty.hs b/src/AST/Pretty.hs index 4d9aeec..63742ad 100644 --- a/src/AST/Pretty.hs +++ b/src/AST/Pretty.hs @@ -275,6 +275,9 @@ operator OOr = (Infix, "||") operator OIf = (Prefix, "ifB") operator ORound64 = (Prefix, "round") operator OToFl64 = (Prefix, "toFl64") +operator ORecip{} = (Prefix, "recip") +operator OExp{} = (Prefix, "exp") +operator OLog{} = (Prefix, "log") ppTy :: Int -> STy t -> String ppTy d ty = ppTys d ty "" |