File tree 1 file changed +4
-2
lines changed
1 file changed +4
-2
lines changed Original file line number Diff line number Diff line change @@ -36,6 +36,7 @@ qt-file-asserts: 0
36
36
qt-file-passes: 0
37
37
qt-file-failures: 0
38
38
qt-file-incompatible: 0
39
+ qt-test-assert: 0
39
40
40
41
;- names
41
42
qt-run-name:
@@ -109,6 +110,7 @@ start-test: func [
109
110
title [string! ]
110
111
] [
111
112
qt-test-name: title
113
+ qt-test-assert: 0
112
114
qt-file-tests: qt-file-tests + 1
113
115
qt-red-only: false
114
116
]
@@ -121,7 +123,7 @@ assert: func [
121
123
assertion [logic! ]
122
124
] [
123
125
qt-file-asserts: qt-file-asserts + 1
124
-
126
+ qt-test-assert: qt-test-assert + 1
125
127
either assertion [
126
128
qt-file-passes: qt-file-passes + 1
127
129
][
@@ -136,7 +138,7 @@ assert: func [
136
138
]
137
139
]
138
140
prin "--test-- "
139
- prin qt-test-name
141
+ prin [ qt-test-name qt-test-assert]
140
142
print either qt-red-only [
141
143
" not like Red********"
142
144
][ " FAILED**************" ]
You can’t perform that action at this time.
0 commit comments