2008-06-29から1日間の記事一覧
ゴルフしたコードが余りに読み辛いのでscheme-modeを導入した上で作成。 (defun golf-buffer-scheme () (interactive) (let ((spc "[ \r\n\t]") (-- "\\|")) (replace-buffer (compile-regexp (concatenate 'string spc "*" "\\(" ; <1> "\"\\(?:[^\"]\\|\\\…
ゴルフしたコードが余りに読み辛いのでscheme-modeを導入した上で作成。 (defun golf-buffer-scheme () (interactive) (let ((spc "[ \r\n\t]") (-- "\\|")) (replace-buffer (compile-regexp (concatenate 'string spc "*" "\\(" ; <1> "\"\\(?:[^\"]\\|\\\…