Add bqn-mode with new comint mode

This commit is contained in:
Dimitri Lozeve 2021-10-29 21:49:01 +02:00
parent 0af78b0a64
commit 6bc0b7fb4e

31
init.el
View file

@ -439,17 +439,44 @@
:custom :custom
(dyalog-fix-whitespace-before-save t)) (dyalog-fix-whitespace-before-save t))
(use-package gnu-apl-mode
:straight t)
(use-package bqn-mode (use-package bqn-mode
:straight (:host github :repo "mlochbaum/BQN" :files ("editors/emacs/*.el")) :straight (:host github :repo "AndersonTorres/bqn-mode")
:after gnu-apl-mode :after gnu-apl-mode
:custom (bqn-key-prefix ) :custom (bqn-key-prefix )
:config :config
(defface bqn-default (defface bqn-default
'((t (:height 140 :family "BQN386 Unicode"))) t) '((t (:height 140 :family "BQN386 Unicode"))) t)
(defun bqn-init () (defun bqn-init ()
(setq buffer-face-mode-face 'bqn-default) (setq buffer-face-mode-face 'bqn-default)
(buffer-face-mode)) (buffer-face-mode))
(add-hook 'bqn-mode-hook 'bqn-init))
(add-hook 'bqn-mode-hook 'bqn-init)
(setq bqn-interpreter-path "~/build/CBQN/BQN")
(setq bqn-keyboard-map
"
(AltGr)~ ¬ # { [ | ` ˜ \\ ^ @ ] }
1 ˘ 2 ¨ 3 4 5 ´ 6 ˝ 7 8 9 ¯ 0 ° + Backspace
² & é \" ˙ ' ( - ÷ è _ ç à ) = ×
Tab A Z E R 𝕣 T Y U I O P ¨ £ Enter
a z e r t y u i o p π ^ $
Caps Q S 𝕊 D F 𝔽 G 𝔾 H « J K L » M % µ
Lock q s 𝕤 d f 𝕗 g 𝕘 h j k l m ù *
Shift W 𝕎 X 𝕏 C V B N ? . / § Shift
w 𝕨 x 𝕩 c v b n , ; ⋄ │: · │! ⎉ │ │
Space:
")
(add-hook 'bqn-keymap-mode-hook 'bqn-init))
(use-package tex-site (use-package tex-site
:defer t :defer t