shithub: MicroHs

Info  •  Files  •  Log  •  Branches

Add missing entries in Translate.

--- a/src/MicroHs/Translate.hs

+++ b/src/MicroHs/Translate.hs

@@ -79,6 +79,18 @@

   ("u<=", primitive "u<="),

   ("u>", primitive "u>"),

   ("u>=", primitive "u>="),

+  ("fadd", primitive "fadd"),

+  ("fsub", primitive "fsub"),

+  ("fmul", primitive "fmul"),

+  ("fdiv", primitive "fdiv"),

+  ("feq", primitive "feq"),

+  ("fne", primitive "fne"),

+  ("flt", primitive "flt"),

+  ("fle", primitive "fle"),

+  ("fgt", primitive "fgt"),

+  ("fge", primitive "fge"),

+  ("fshow", primitive "fshow"),

+  ("fread", primitive "fread"),

   ("seq", primitive "seq"),

   ("error", primitive "error"),

   ("equal", primitive "equal"),

-- 

⑨