|
;; Emacs indent settings
|
|
(progn
|
|
(mapcar #'(lambda (x) (put x 'scheme-indent-function 1))
|
|
'(transition extend-transition prefix-transition
|
|
extend-transition* prefix-transition*))
|
|
(mapcar #'(lambda (x) (put x 'scheme-indent-function 2))
|
|
'(role role/fresh yield)))
|