From 2b1562d33bb9496aa449ef9d52735af0ec61c15c Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Sat, 9 Nov 2024 11:34:04 +0100 Subject: Some more primitive operators --- src/AST/Pretty.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/AST/Pretty.hs') 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 "" -- cgit v1.2.3-70-g09d2