Adding PLAI keywords to default indent

This commit is contained in:
Jay McCarthy 2010-09-13 10:29:03 -06:00
parent ee5811b930
commit 12fb39f5bd

View File

@ -208,7 +208,10 @@
(let ([hash-table (make-hasheq)]) (let ([hash-table (make-hasheq)])
(for-each (λ (x) (for-each (λ (x)
(hash-set! hash-table x 'define)) (hash-set! hash-table x 'define))
'(struct local)) '(struct
local
define-type))
(for-each (λ (x) (for-each (λ (x)
(hash-set! hash-table x 'begin)) (hash-set! hash-table x 'begin))
'(case-lambda '(case-lambda
@ -264,6 +267,8 @@
with-output-to-file with-output-to-port with-output-to-file with-output-to-port
for-all for-all
type-case
)) ))
(preferences:set-default (preferences:set-default
'framework:tabify 'framework:tabify