skipping lang extents.

This commit is contained in:
Kazu Yamamoto 2014-03-25 16:02:26 +09:00
parent e9b3b44631
commit 58b64cc9e2

View File

@ -33,6 +33,8 @@
(if (string-match "^[a-z]" file)
"Main"
file))))
(while (looking-at "^{-#")
(forward-line))
(insert "module " mod " where\n")))
;; (defun ghc-capitalize (str)