shithub: femtolisp

Download patch

ref: d66b628e7ce513210cf583e5a3d91e328267ba01
parent: 865fae41bab79ebda060ea687930d59efb0890a6
author: Sigrid Solveig Haflínudóttir <ftrvxmtrx@gmail.com>
date: Sun Nov 29 17:49:54 EST 2020

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';