Add with-fresh-name-state-from-dfg

[bpt/guile.git] / .dir-locals.el

diff --git a/.dir-locals.el b/.dir-locals.el
index 2efca64..597f741 100644 (file)
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -14,6 +14,7 @@
      (eval . (put 'let-gensyms         'scheme-indent-function 1))
      (eval . (put 'let-fresh           'scheme-indent-function 2))
      (eval . (put 'with-fresh-name-state 'scheme-indent-function 1))
+     (eval . (put 'with-fresh-name-state-from-dfg 'scheme-indent-function 1))
      (eval . (put 'build-cps-term      'scheme-indent-function 0))
      (eval . (put 'build-cps-exp       'scheme-indent-function 0))
      (eval . (put 'build-cps-cont      'scheme-indent-function 0))