From 9b87abf55bd3c28147a24f44731d3aebed67d0e5 Mon Sep 17 00:00:00 2001
From: Yohei Kakiuchi <youhei@jsk.imi.i.u-tokyo.ac.jp>
Date: Wed, 29 Apr 2020 04:43:37 +0900
Subject: [PATCH] geo/intersection.c: fix intersection3 (may be optimization
 problem)

---
 lisp/geo/intersection.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/geo/intersection.c b/lisp/geo/intersection.c
index 1324d34de..bc5bc2f92 100644
--- a/lisp/geo/intersection.c
+++ b/lisp/geo/intersection.c
@@ -91,7 +91,7 @@ register pointer argv[];
   eusfloat_t cz,u,v;
   eusfloat_t *p1, v1[3], *p2, v2[3], p2p1[3];
   eusfloat_t cross[3], cross2;
-  numunion nu;
+  volatile numunion nu;
 
   ckarg2(4,5);
   if (!isfltvector(argv[0])) error(E_FLOATVECTOR,NULL);