mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-12-22 21:29:32 +00:00
Tweak block test incl. golden file to make it pass:
Close and reopen log file before and after FLUSH. Adapt golden file to 16x64 screen format and .fb instead of direkt disk access.
This commit is contained in:
parent
155eceadcf
commit
91c74f0830
@ -117,6 +117,10 @@ test-std.golden: $(patsubst %, tests/golden/%.golden, \
|
||||
prelim core coreplus coreext doubltst report-noblk)
|
||||
cat $^ > $@
|
||||
|
||||
test-blk.golden: $(patsubst %, tests/golden/%.golden, \
|
||||
prelim core coreplus coreext doubltst block report-blk)
|
||||
cat $^ > $@
|
||||
|
||||
test-volks4th-min.golden: $(patsubst %, tests/golden/%.golden, \
|
||||
volks4th-prelim core)
|
||||
cat $^ > $@
|
||||
|
@ -27,6 +27,9 @@
|
||||
\ - errorreport.fth has been loaded prior to this file
|
||||
\ - utilities.fth has been loaded prioir to this file
|
||||
\ ------------------------------------------------------------------------------
|
||||
|
||||
use empty.fb
|
||||
|
||||
TESTING Block word set
|
||||
|
||||
DECIMAL
|
||||
|
@ -1,5 +1,5 @@
|
||||
|
||||
blocktest.fth**=== NOT TESTED === *******Scr 21 Dr 1
|
||||
FLUSH exists
|
||||
BLOCK.FTH **=== NOT TESTED === ******* Scr 21 Dr 5 EMPTY.FB
|
||||
0 Should show a (mostly) blank screen
|
||||
1
|
||||
2
|
||||
@ -16,16 +16,7 @@ blocktest.fth**=== NOT TESTED === *******Scr 21 Dr 1
|
||||
13
|
||||
14
|
||||
15
|
||||
16
|
||||
17
|
||||
18
|
||||
19
|
||||
20
|
||||
21
|
||||
22
|
||||
23
|
||||
24
|
||||
Scr 20 Dr 1
|
||||
Scr 20 Dr 5 EMPTY.FB
|
||||
0 List of the First test block
|
||||
1
|
||||
2
|
||||
@ -42,16 +33,7 @@ Scr 20 Dr 1
|
||||
13
|
||||
14
|
||||
15
|
||||
16
|
||||
17
|
||||
18
|
||||
19
|
||||
20
|
||||
21
|
||||
22
|
||||
23
|
||||
24
|
||||
Scr 29 Dr 1
|
||||
Scr 29 Dr 5 EMPTY.FB
|
||||
0 List of the Last test block
|
||||
1
|
||||
2
|
||||
@ -68,16 +50,7 @@ Scr 29 Dr 1
|
||||
13
|
||||
14
|
||||
15
|
||||
16
|
||||
17
|
||||
18
|
||||
19
|
||||
20
|
||||
21
|
||||
22
|
||||
23
|
||||
24
|
||||
Scr 25 Dr 1
|
||||
Scr 25 Dr 5 EMPTY.FB
|
||||
0
|
||||
1
|
||||
2
|
||||
@ -93,18 +66,9 @@ Scr 25 Dr 1
|
||||
12
|
||||
13
|
||||
14
|
||||
15
|
||||
16
|
||||
17
|
||||
18
|
||||
19
|
||||
20
|
||||
21
|
||||
22
|
||||
23
|
||||
24 End of Screen
|
||||
Scr 21 Dr 1
|
||||
0 Should show another (mostly) blank scree
|
||||
15 End of Screen
|
||||
Scr 21 Dr 5 EMPTY.FB
|
||||
0 Should show another (mostly) blank screen
|
||||
1
|
||||
2
|
||||
3
|
||||
@ -120,15 +84,6 @@ Scr 21 Dr 1
|
||||
13
|
||||
14
|
||||
15
|
||||
16
|
||||
17
|
||||
18
|
||||
19
|
||||
20
|
||||
21
|
||||
22
|
||||
23
|
||||
24
|
||||
*** | exists Given Characters per Line: 41
|
||||
*** | exists Given Characters per Line: 64
|
||||
*
|
||||
End of Block word tests
|
||||
|
@ -16,7 +16,8 @@ include errorrep.fth
|
||||
|
||||
include coreext.fth
|
||||
include doubltst.fth
|
||||
use empty.fb
|
||||
|
||||
: flush logclose flush logreopen ;
|
||||
include block.fth
|
||||
|
||||
REPORT-ERRORS
|
||||
|
Loading…
Reference in New Issue
Block a user