/[cmucl]/src/tools/hemcom.lisp
ViewVC logotype

Diff of /src/tools/hemcom.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.1.1 by ram, Sun Jun 17 12:13:44 1990 UTC revision 1.1.1.2 by ram, Fri Jul 13 14:55:57 1990 UTC
# Line 2  Line 2 
2  ;;; This file compiles all of Hemlock.  ;;; This file compiles all of Hemlock.
3  ;;;  ;;;
4    
5    (c::%proclaim '(optimize (debug-info 2)))
6  #|  #|
7  (when (ext:get-command-line-switch "slave")  (when (ext:get-command-line-switch "slave")
8    (error "Cannot compile Hemlock in a slave due to its clobbering needed    (error "Cannot compile Hemlock in a slave due to its clobbering needed
# Line 32  Line 33 
33  (export '(%sp-byte-blt %sp-find-character %sp-find-character-with-attribute  (export '(%sp-byte-blt %sp-find-character %sp-find-character-with-attribute
34                         %sp-reverse-find-character-with-attribute))                         %sp-reverse-find-character-with-attribute))
35    
36    (in-package "C")
37    (export 'compile-from-stream)
38    
39  (in-package "HI")  (in-package "HI")
40    
41  ;;; ### bootstrap hack...  ;;; ### bootstrap hack...
# Line 63  Line 67 
67  (comf "hem:charmacs" :always-once t)  (comf "hem:charmacs" :always-once t)
68  ;; keytran and keytrandefs used to be in rompsite, but they are too big now.  ;; keytran and keytrandefs used to be in rompsite, but they are too big now.
69  ;; They also need to go after charmacs due to the funny characters named.  ;; They also need to go after charmacs due to the funny characters named.
70  (comf "hem:keytran")  ;(comf "hem:keytran")
71  (comf "hem:keytrandefs")  ;(comf "hem:keytrandefs")
72  (comf "hem:macros" :always-once t)  (comf "hem:macros" :always-once t)
73  (comf "hem:line" :always-once t)  (comf "hem:line" :always-once t)
74  (comf "hem:ring")  (comf "hem:ring")
# Line 79  Line 83 
83  (comf "hem:cursor")  (comf "hem:cursor")
84  (comf "hem:syntax")  (comf "hem:syntax")
85  (comf "hem:winimage")  (comf "hem:winimage")
86  (comf "hem:hunk-draw")  ;(comf "hem:hunk-draw")
87  ;(comf "hem:bit-stream")  ;(comf "hem:bit-stream")
88  (comf "hem:termcap")  (comf "hem:termcap")
89  (comf "hem:display")  (comf "hem:display")
90  (comf "hem:bit-display")  ;(comf "hem:bit-display")
91  (comf "hem:tty-disp-rt")  (comf "hem:tty-disp-rt")
92  (comf "hem:tty-display")  (comf "hem:tty-display")
93  ;(comf "hem:tty-stream")  ;(comf "hem:tty-stream")
94  (comf "hem:pop-up-stream")  (comf "hem:pop-up-stream")
95  (comf "hem:screen")  (comf "hem:screen")
96  (comf "hem:bit-screen")  ;(comf "hem:bit-screen")
97  (comf "hem:tty-screen")  (comf "hem:tty-screen")
98  (comf "hem:window")  (comf "hem:window")
99  (comf "hem:font")  (comf "hem:font")
# Line 149  Line 153 
153  (comf "hem:completion")  (comf "hem:completion")
154  (comf "hem:shell")  (comf "hem:shell")
155  (comf "hem:bindings")  (comf "hem:bindings")
156    (comf "hem:hacks")
157    
158  ); With-Compiler-Log-File  ); With-Compiler-Log-File

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.1.1.2

  ViewVC Help
Powered by ViewVC 1.1.5