create core binaries as 'racket' and 'gracket'
original commit: 0f0a59732e9a446aa42c9ab3b43c473ea57e6763
This commit is contained in:
parent
d369a52af3
commit
564ebfed03
|
@ -50,14 +50,14 @@
|
|||
(super-init)
|
||||
(let ([s (last-position)]
|
||||
[m (regexp-match #rx"^(.*), (Copyright.*)$" (banner))])
|
||||
(insert (format "Welcome to ~a." (cadr m)))
|
||||
(insert (format "~a." (cadr m)))
|
||||
(let ([e (last-position)])
|
||||
(insert #\newline)
|
||||
(change-style (send (make-object wx:style-delta% 'change-bold) set-delta-foreground "BLUE") s e))
|
||||
(output (caddr m)))
|
||||
(insert "This is a simple window for evaluating MrEd Scheme expressions.") (insert #\newline)
|
||||
(insert "This is a simple window for evaluating Racket expressions.") (insert #\newline)
|
||||
(let ([s (last-position)])
|
||||
(insert "Quit now and run DrScheme to get a better window.")
|
||||
(insert "Quit now and run DrRacket to get a better window.")
|
||||
(let ([e (last-position)])
|
||||
(insert #\newline)
|
||||
(change-style
|
||||
|
|
Loading…
Reference in New Issue
Block a user