Browse Source

fixed derrons endrem at end of file bug report ?topic=103112

nitrologic 10 years ago
parent
commit
ad61acaac1
2 changed files with 1 additions and 1 deletions
  1. 1 1
      maxide.bmx
  2. BIN
      monk.bmx

+ 1 - 1
maxide.bmx

@@ -4343,7 +4343,7 @@ Type TOpenCode Extends TToolPanel
 			If pos>src.length Exit	'fixed endrem on lastline overrun
 			p=src.FindLast("rem",src.length-pos)
 			If p=-1 Exit						
-			If isntalphanumeric(src[p+3]) And IsFirstCharOnLine(src,p) Return p			
+			If ( p>=src.length-3 Or isntalphanumeric(src[p+3]) ) And IsFirstCharOnLine(src,p) Return p			
 			pos=p-1
 		Wend
 		Return -1

BIN
monk.bmx