From c44f046a1279c2d29ef3e46ec2e35d7aaecb580f Mon Sep 17 00:00:00 2001
From: "J.W.F. (he/him)" <jflory7@gmail.com>
Date: Tue, 2 Mar 2021 11:25:45 -0500
Subject: [PATCH] stop reused integers from being optimized out (#14)

Signed-off-by: Jan200101 <sentrycraft123@gmail.com>

Co-authored-by: Jan200101 <sentrycraft123@gmail.com>
---
 np1.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/np1.c b/np1.c
index 8c6c21b..5afc130 100644
--- a/np1.c
+++ b/np1.c
@@ -27,7 +27,7 @@ logical vbflag;
     const integer r50wal = 36852;
 
     /* System generated locals */
-    integer ret_val, i__1, i__2;
+    volatile integer ret_val, i__1, i__2;
 
     /* Local variables */
     integer i, j, adj;