diff options
Diffstat (limited to 'sandbox/008-sandbox-test.mu')
-rw-r--r-- | sandbox/008-sandbox-test.mu | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sandbox/008-sandbox-test.mu b/sandbox/008-sandbox-test.mu index a73064df..ce896017 100644 --- a/sandbox/008-sandbox-test.mu +++ b/sandbox/008-sandbox-test.mu @@ -78,14 +78,14 @@ after <render-sandbox-response> [ break-unless sandbox-response expected-response:address:array:character <- get *sandbox, expected-response:offset break-unless expected-response # fall-through to print in grey - response-is-expected?:boolean <- string-equal expected-response, sandbox-response + response-is-expected?:boolean <- text-equal expected-response, sandbox-response { break-if response-is-expected?:boolean - row, screen <- render-string screen, sandbox-response, left, right, 1/red, row + row, screen <- render screen, sandbox-response, left, right, 1/red, row } { break-unless response-is-expected?:boolean - row, screen <- render-string screen, sandbox-response, left, right, 2/green, row + row, screen <- render screen, sandbox-response, left, right, 2/green, row } jump +render-sandbox-end:label } |