gen.println("\t\t\t\tif (level==0) then ; oldEols=line-line0; NextCh(); return true; end");
gen.println("\t\t\t\tif (level==0) then ; oldEols=@@line-line0; NextCh(); return true; end");
	private static void GenComBody(Comment com) {		gen.println(    "\t\tloop do");		gen.println(    "\t\t\tif (" + ChCond(com.stop.charAt(0)) + ") then");		if (com.stop.length()==1) {			gen.println("\t\t\t\tlevel -= 1;");			gen.println("\t\t\t\tif (level==0) then ; oldEols=line-line0; NextCh(); return true; end");			gen.println("\t\t\t\tNextCh();");		} else {			gen.println("\t\t\t\tNextCh();");			gen.println("\t\t\t\tif (" + ChCond(com.stop.charAt(1)) + ") then");			gen.println("\t\t\t\t\tlevel -= 1;");			gen.println("\t\t\t\t\tif (level==0) then ; oldEols=line-line0; NextCh(); return true; end");			gen.println("\t\t\t\t\tNextCh();");			gen.println("\t\t\t\tend");		}		if (com.nested) {			gen.println("\t\t\telsif (" + ChCond(com.start.charAt(0)) + ") then");			if (com.start.length()==1)				gen.println("\t\t\t\tlevel += 1; NextCh();");			else {				gen.println("\t\t\t\tNextCh();");				gen.println("\t\t\t\tif (" + ChCond(com.start.charAt(1)) + ") then");				gen.println("\t\t\t\t\tlevel += 1; NextCh();");				gen.println("\t\t\t\tend");			}		}		gen.println("\t\t\telsif (ch==EOF) then; return false");		gen.println("\t\t\telse NextCh();");		gen.println("\t\t\tend");		gen.println("\t\tend");	}