awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

lang/scheme: fix support for scheme implementations

Browse Source 
Adds the following flags:

  +chez
  +chibi
  +chicken
  +gambit
  +gauche
  +guile
  +kawa
  +mit
  +racket

Fixes #4863
This commit is contained in:
Henrik Lissner
2021-04-13 22:41:31 -04:00
parent 5ee8080ca7
commit 32cf114dc7
6 changed files with 80 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
modules/lang/scheme/autoload.el
View File

@ -1,5 +1,20 @@
;;; lang/scheme/autoload.el -*- lexical-binding: t; -*-
;; HACK geiser-* plugins will try to add to `geiser-active-implementations', so
;; it must be defined before their autoloads are evaluated. Fortunately,
;; Doom modules' autoloads run earlier than package autoloads.
;;;###autoload
(defvar geiser-active-implementations ())
;; HACK `geiser-impl--add-to-alist' isn't autoloaded or inlined, so you get
;; void-function errors when it is called in the autoloads files of other
;; geiser-* packages.
;;;###autoload
(defun geiser-impl--add-to-alist (kind what impl &optional append)
(add-to-list 'geiser-implementations-alist
(list (list kind what) impl) append))
(defvar calculate-lisp-indent-last-sexp)
;; Adapted from https://github.com/alezost/emacs-config/blob/master/utils/al-scheme.el#L76-L123