((scheme-mode . ((eval . (put 'with-cells 'scheme-indent-function 1)) (eval . (put 'pbind 'scheme-indent-function 1)))))