-
Notifications
You must be signed in to change notification settings - Fork 49
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
add tests for issue #196: typing in program line with line feed
remove editor swap file from type_program_with_line_feed
- Loading branch information
1 parent
7c09a9d
commit 5126ec7
Showing
7 changed files
with
88 additions
and
0 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,6 @@ | ||
[pcbasic] | ||
font=freedos | ||
quit=False | ||
load=TEST.BAS | ||
soft-linefeed=False | ||
keys=2010 rem continuing\nline\rlist\rrun 1000\rsystem\r |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,12 @@ | ||
999 END | ||
1000 ' dump screen with RUN 1000 | ||
1010 DEF SEG=&HB800 | ||
1020 OPEN "output.txt" FOR OUTPUT AS 1 | ||
1030 FOR Y = 0 TO 24 | ||
1040 FOR X = 0 TO 79 | ||
1050 PRINT #1, CHR$(PEEK(2*(Y*80+X))); | ||
1060 NEXT | ||
1065 PRINT #1, "" | ||
1070 NEXT | ||
1080 CLOSE 1 | ||
26 changes: 26 additions & 0 deletions
26
tests/basic/gwbasic/type_program_with_line_feed/model/OUTPUT.TXT
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,26 @@ | ||
Ok� | ||
2010 rem continuing | ||
line | ||
list | ||
999 END | ||
1000 ' dump screen with RUN 1000 | ||
1010 DEF SEG=&HB800 | ||
1020 OPEN "output.txt" FOR OUTPUT AS 1 | ||
1030 FOR Y = 0 TO 24 | ||
1040 FOR X = 0 TO 79 | ||
1050 PRINT #1, CHR$(PEEK(2*(Y*80+X))); | ||
1060 NEXT | ||
1065 PRINT #1, "" | ||
1070 NEXT | ||
1080 CLOSE 1 | ||
2010 REM continuing | ||
line | ||
Ok� | ||
run 1000 | ||
|
||
|
||
|
||
|
||
|
||
|
||
Binary file not shown.
6 changes: 6 additions & 0 deletions
6
tests/basic/gwbasic/type_program_with_line_feed_ESC/PCBASIC.INI
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,6 @@ | ||
[pcbasic] | ||
font=freedos | ||
quit=False | ||
load=TEST.BAS | ||
soft-linefeed=False | ||
keys=2010 rem continuing\nline\rlist\r\0\x48\0\x48\x1b\0\x50\0\x50run 1000\rsystem\r |
12 changes: 12 additions & 0 deletions
12
tests/basic/gwbasic/type_program_with_line_feed_ESC/TEST.BAS
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,12 @@ | ||
999 END | ||
1000 ' dump screen with RUN 1000 | ||
1010 DEF SEG=&HB800 | ||
1020 OPEN "output.txt" FOR OUTPUT AS 1 | ||
1030 FOR Y = 0 TO 24 | ||
1040 FOR X = 0 TO 79 | ||
1050 PRINT #1, CHR$(PEEK(2*(Y*80+X))); | ||
1060 NEXT | ||
1065 PRINT #1, "" | ||
1070 NEXT | ||
1080 CLOSE 1 | ||
26 changes: 26 additions & 0 deletions
26
tests/basic/gwbasic/type_program_with_line_feed_ESC/model/OUTPUT.TXT
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,26 @@ | ||
Ok� | ||
2010 rem continuing | ||
line | ||
list | ||
999 END | ||
1000 ' dump screen with RUN 1000 | ||
1010 DEF SEG=&HB800 | ||
1020 OPEN "output.txt" FOR OUTPUT AS 1 | ||
1030 FOR Y = 0 TO 24 | ||
1040 FOR X = 0 TO 79 | ||
1050 PRINT #1, CHR$(PEEK(2*(Y*80+X))); | ||
1060 NEXT | ||
1065 PRINT #1, "" | ||
1070 NEXT | ||
1080 CLOSE 1 | ||
|
||
Ok� | ||
run 1000 | ||
|
||
|
||
|
||
|
||
|
||
|
||
|
||