Add bqn-mode with new comint mode
This commit is contained in:
parent
0af78b0a64
commit
6bc0b7fb4e
1 changed files with 29 additions and 2 deletions
31
init.el
31
init.el
|
@ -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
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue