fix division by 0 error in findmodule

fix possible uninitialised var error in findmodule and showmodule
dmcoles · Jul 10, 2024 · bf74f16 · bf74f16
1 parent 7f15a6d
commit bf74f16
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 3 deletions.
diff --git a/tools/FindModule/FindModule.e b/tools/FindModule/FindModule.e
@@ -187,7 +187,11 @@ PROC search(mem,flen,filename:PTR TO CHAR) HANDLE
           StrCopy(ptrRepText,'')
           StrCopy(dimsText,'')
           dimscount:=0
+          fl:=0
           IF thisvers>=12
+            IF thisvers>=13
+              fl:=o[]++
+            ENDIF
             ptrrep:=o[]++
             WHILE (ptrrep>0)
               StrAdd(ptrRepText,'PTR TO ')
@@ -203,9 +207,6 @@ PROC search(mem,flen,filename:PTR TO CHAR) HANDLE
             ENDWHILE
           ENDIF
           IF thisvers>=6
-            IF thisvers>=13
-              fl:=o[]++
-            ENDIF
             IF (c:=o[]++)>=0
               IF c=0
                 IF match2 THEN WriteF(':\s\n',types[val])

diff --git a/tools/ShowModule/ShowModule.e b/tools/ShowModule/ShowModule.e
@@ -152,6 +152,7 @@ PROC process()
           StrCopy(ptrRepText,'')
           StrCopy(dimsText,'')
           dimscount:=0
+          fl:=0
           IF thisvers>=12
             IF thisvers>=13
               fl:=o[]++