shithub: femtolisp

Info  •  Files  •  Log  •  Branches

disable FPZDIV

--- a/flmain.c

+++ b/flmain.c

@@ -29,6 +29,10 @@

 {

     char fname_buf[1024];

+#ifdef __plan9__

+    setfcr(FPPDBL|FPRNR|FPINVAL|FPOVFL);

+#endif

+

     fl_init(512*1024);

     fname_buf[0] = '\0';