Emacs | Common Lisp 備忘録

2026-04-02: Emacs 上のカーソルカラーの変更

Emacs をコンソール表示している場合、カーソル色はターミナルのが適用されるので、以下のコマンドで強制的に変更する。

(when (not (display-graphic-p))
  ;; Set cursor color on Emacs startup
  (send-string-to-terminal "\e]12;#FF6600\a")
  ;; Reset cursor color when Emacs exits
  (add-hook 'kill-emacs-hook
            (lambda () (send-string-to-terminal "\e]12;#3f3f3f\a"))))

2026-04-01: ライブラリパスの設定

This checks both OS and architecture:

:arm64 + :darwin → Apple Silicon paths (/opt/homebrew/) :x86-64 + :darwin → Intel paths (local)

The local lib/ directory (via your cffi:foreign-library-directories push) is still tried first via the plain "libta-lib.dylib" entry

(cffi:define-foreign-library libta-lib
  ((:and :darwin :arm64)
   (:or "libta-lib.dylib"
        "/opt/homebrew/lib/libta_lib.dylib"
        "/opt/homebrew/lib/libta-lib.dylib"))
  ((:and :darwin :x86-64)
   (:or "libta-lib.dylib"
        "/usr/local/lib/libta_lib.dylib"
        "/usr/local/lib/libta-lib.dylib"))
  (:linux  (:or "libta-lib.so" "libta_lib.so" "libta_lib.so.0"))
  (:windows (:or "libta-lib.dll" "ta_lib.dll"))
  (t (:default "libta-lib")))

2026-04-01: LispWorks 7.12 の設定ファイルの更新

LispWorks 特有のエラー回避方法のまとめ

; esrapのエラー回避方法
; macos
; sed -i '' 's/#\\¶/#\\U+00B6/g' ~/quicklisp/dists/quicklisp/software/esrap-20260101-git/src/interface.lisp
; linux:
; sed -i 's/#\\¶/#\\U+00B6/g' ~/quicklisp/dists/quicklisp/software/esrap-20260101-git/src/interface.lisp

; 何のエラーだったか忘れた
(ql:quickload :flexi-streams)

; MacOS Tahoe 26でOpenSSLのエラー回避
(comm:set-ssl-library-path '("/usr/local/lib/libssl.dylib" "/usr/local/lib/libcrypto.dylib"))