make language test work with cgc
This commit is contained in:
parent
2e8f771661
commit
5339be7594
|
@ -1218,7 +1218,9 @@ the settings above should match r5rs
|
|||
[get-line (lambda (n) (send interactions get-text
|
||||
(send interactions paragraph-start-position n)
|
||||
(send interactions paragraph-end-position n)))]
|
||||
[line0-expect (format "Welcome to DrRacket, version ~a [3m]." (version:version))]
|
||||
[line0-expect (format "Welcome to DrRacket, version ~a [~a]."
|
||||
(version:version)
|
||||
(system-type 'gc))]
|
||||
[line1-expect
|
||||
(if (string? short-lang)
|
||||
(format "Language: ~a" short-lang)
|
||||
|
|
Loading…
Reference in New Issue
Block a user