~amirouche/sink-kernel

d8264e004c888ea9cbffa7211c1e033c20fa001f — Amirouche 7 months ago 19edea9
emacs++
1 files changed, 38 insertions(+), 0 deletions(-)

A .dir-locals.el
A .dir-locals.el => .dir-locals.el +38 -0
@@ 0,0 1,38 @@
;; Copyright © Marc Nieper-Wißkirchen (2020).

;; This file is part of Unsyntax.

;; Permission is hereby granted, free of charge, to any person
;; obtaining a copy of this software and associated documentation files
;; (the "Software"), to deal in the Software without restriction,
;; including without limitation the rights to use, copy, modify, merge,
;; publish, distribute, sublicense, and/or sell copies of the Software,
;; and to permit persons to whom the Software is furnished to do so,
;; subject to the following conditions:

;; The above copyright notice and this permission notice (including the
;; next paragraph) shall be included in all copies or substantial
;; portions of the Software.

;; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
;; EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
;; MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
;; NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
;; BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
;; ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
;; CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
;; SOFTWARE.

((scheme-mode
  . ((eval
      . (progn
          (put '$define! 'scheme-indent-function 'defun)
          (put '$vau 'scheme-indent-function 2)
          (put '$let 'scheme-indent-function 1)
          (put 'guard-dynamic-extent 'scheme-indent-function 1)
          (put '$provide! 'scheme-indent-function 1)
          (put '$lambda 'scheme-indent-function 1)
          (put '$letrec 'scheme-indent-function 1)
          (put 'meta 'scheme-indent-function 'defun)
          (put 'test-group 'scheme-indent-function 1)
          (put 'in-meta 'scheme-indent-function 0)