moved legacy languages

svn: r9731
This commit is contained in:
Robby Findler 2008-05-08 06:37:05 +00:00
parent d5e3d7a4fc
commit 2491bfed70
2 changed files with 3 additions and 3 deletions

View File

@ -1452,7 +1452,7 @@
"plt:pretty-big" "plt:pretty-big"
(list (string-constant legacy-languages) (list (string-constant legacy-languages)
(string-constant pretty-big-scheme)) (string-constant pretty-big-scheme))
(list -1000 3) (list -200 3)
#t #t
(string-constant pretty-big-scheme-one-line-summary) (string-constant pretty-big-scheme-one-line-summary)
assume-mixin)) assume-mixin))
@ -1461,7 +1461,7 @@
"plt:r5rs" "plt:r5rs"
(list (string-constant legacy-languages) (list (string-constant legacy-languages)
(string-constant r5rs-language-name)) (string-constant r5rs-language-name))
(list -1000 -1000) (list -200 -1000)
#f #f
(string-constant r5rs-one-line-summary) (string-constant r5rs-one-line-summary)
(lambda (%) (r5rs-mixin (assume-mixin %))))) (lambda (%) (r5rs-mixin (assume-mixin %)))))

View File

@ -20,7 +20,7 @@
(drscheme:language:simple-module-based-language->module-based-language-mixin (drscheme:language:simple-module-based-language->module-based-language-mixin
(class* object% (class* object%
(drscheme:language:simple-module-based-language<%>) (drscheme:language:simple-module-based-language<%>)
(define/public (get-language-numbers) `(-1000 2000 ,num*)) (define/public (get-language-numbers) `(-200 2000 ,num*))
(define/public (get-language-position) (define/public (get-language-position)
(list (string-constant legacy-languages) (list (string-constant legacy-languages)
"Swindle" entry-name*)) "Swindle" entry-name*))