Procházet zdrojové kódy

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

nitrologic před 10 roky
rodič
revize
ad61acaac1
2 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      maxide.bmx
  2. binární
      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ární
monk.bmx