mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-01-31 19:43:32 +00:00
12 lines
351 B
EmacsLisp
12 lines
351 B
EmacsLisp
|
(require 'compile)
|
||
|
|
|
||
|
|
(define-derived-mode optinfo-mode compilation-mode "Optimization Info"
|
||
|
|
(let ((root (locate-dominating-file (buffer-file-name) "Makefile")))
|
||
|
|
(when root
|
||
|
|
(setq-local default-directory root))))
|
||
|
|
|
||
|
|
(auto-compression-mode t)
|
||
|
|
(add-to-list 'auto-mode-alist '("\\.optinfo\\(\\|\\.gz\\)$" . optinfo-mode))
|
||
|
|
|
||
|
|
(provide 'optinfo-mode)
|