소스 검색

*** empty log message ***

florian 27 년 전
부모
커밋
c876b474c6
3개의 변경된 파일21개의 추가작업 그리고 0개의 파일을 삭제
  1. 6 0
      bugs/bug0128.pp
  2. 12 0
      bugs/bug0129.pp
  3. 3 0
      bugs/readme.txt

+ 6 - 0
bugs/bug0128.pp

@@ -0,0 +1,6 @@
+const
+   ArrowKeysOrFirstLetter='arrow keys '^]^r^z' or First letter.   ';
+
+begin
+   writeln(ord(^)));
+end.

+ 12 - 0
bugs/bug0129.pp

@@ -0,0 +1,12 @@
+var
+ e:boolean;
+ a:integer;
+begin
+ e:=true;
+ a:=3;
+ while (a<5) and e do begin
+  e:=false;
+  write('*');
+  continue;
+ end;
+end.

+ 3 - 0
bugs/readme.txt

@@ -173,3 +173,6 @@ bug0123.pp   problem with intel assembler (shrd)
 bug0124.pp   problem with -Rintel switch and indexing (whatever the order)
 bug0125.pp   wrong colors with DOS CRT unit
 bug0127.pp   problem with cdecl in implementation part
+bug0128.pp   problem with ^[
+bug0129.pp   endless loop with while/continue
+