HCoop / bpt / guile.git / blame
| Commit | Line | Data |
|---|---|---|
| 3d1a89b9 NJ |
1 | (define-module (lang elisp base)) |
| 2 | ||
| 3 | ;;; {Elisp Primitives} | |
| 4 | ;;; | |
| 5 | ;;; In other words, Scheme definitions of elisp primitives. This | |
| 6 | ;;; should (ultimately) include everything that Emacs defines in C. | |
| 7 | ||
| 8 | (use-modules (lang elisp primitives buffers) | |
| 9 | (lang elisp primitives features) | |
| 10 | (lang elisp primitives format) | |
| 11 | (lang elisp primitives fns) | |
| 12 | (lang elisp primitives guile) | |
| 13 | (lang elisp primitives keymaps) | |
| 14 | (lang elisp primitives lists) | |
| 15 | (lang elisp primitives load) | |
| 16 | (lang elisp primitives match) | |
| 17 | (lang elisp primitives numbers) | |
| 18 | (lang elisp primitives pure) | |
| 19 | (lang elisp primitives read) | |
| 20 | (lang elisp primitives signal) | |
| 21 | (lang elisp primitives strings) | |
| 22 | (lang elisp primitives symprop) | |
| 23 | (lang elisp primitives system) | |
| 24 | (lang elisp primitives time)) | |
| 25 | ||
| 26 | ;;; Now switch into Emacs Lisp syntax. | |
| 27 | ||
| 28 | (use-modules (lang elisp transform)) | |
| 29 | (read-set! keywords 'prefix) | |
| 30 | (read-set! language 'elisp) | |
| 31 | (set-module-transformer! (current-module) transformer) | |
| 32 | ||
| 33 | ;;; Everything below here is written in Elisp. | |
| 34 | ||
| 35 | (defun load-emacs () | |
| 36 | (message "Calling loadup.el to clothe the bare Emacs...") | |
| 37 | (load "loadup.el") | |
| 38 | (message "Guile Emacs now fully clothed")) |