--- capa/capa51/pProj/capaCommon.c	2006/07/28 06:38:13	1.28
+++ capa/capa51/pProj/capaCommon.c	2024/04/27 16:36:30	1.30
@@ -150,7 +150,7 @@ funlockstream(sp) FILE *sp;
 
 int
 inquery_a_lock(sp,cmd,type,offset,whence,len)
-FILE *sp;int cmd;off_t offset;int whence;off_t len;
+FILE *sp;int cmd;short int type;off_t offset;int whence;off_t len;
 {
   struct flock lock;
   int    fd;
@@ -3311,6 +3311,9 @@ char *fml_str;char *input_str;char *var_
       outcome = BAD_FORMULA;
       break;
     }
+    if (outcome != APPROX_ANS) {
+      break;
+    }
   }
   capa_mfree((char *)check_fml_str);