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

Contents of /src/tools/hemload.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.3 - (show annotations)
Mon Jul 29 08:56:59 1991 UTC (22 years, 8 months ago) by chiles
Branch: MAIN
CVS Tags: sparc-tramp-assem-base, double-double-array-base, post-merge-intl-branch, release-19b-pre1, release-19b-pre2, merged-unicode-utf16-extfmt-2009-06-11, double-double-init-sparc-2, unicode-utf16-extfmt-2009-03-27, double-double-base, snapshot-2007-09, snapshot-2007-08, snapshot-2008-08, snapshot-2008-09, ppc_gencgc_snap_2006-01-06, sse2-packed-2008-11-12, snapshot-2008-05, snapshot-2008-06, snapshot-2008-07, snapshot-2007-05, snapshot-2008-01, snapshot-2008-02, snapshot-2008-03, intl-branch-working-2010-02-19-1000, snapshot-2006-11, snapshot-2006-10, double-double-init-sparc, snapshot-2006-12, unicode-string-buffer-impl-base, sse2-base, release-20b-pre1, release-20b-pre2, unicode-string-buffer-base, RELEASE_18d, sse2-packed-base, sparc-tramp-assem-2010-07-19, amd64-dd-start, snapshot-2003-10, snapshot-2004-10, release-18e-base, release-19f-pre1, snapshot-2008-12, snapshot-2008-11, intl-2-branch-base, snapshot-2004-08, snapshot-2004-09, remove_negative_zero_not_zero, snapshot-2007-01, snapshot-2007-02, snapshot-2004-05, snapshot-2004-06, snapshot-2004-07, release-19e, release-19d, GIT-CONVERSION, double-double-init-ppc, release-19c, dynamic-extent-base, unicode-utf16-sync-2008-12, LINKAGE_TABLE, release-19c-base, cross-sol-x86-merged, label-2009-03-16, release-19f-base, PRE_LINKAGE_TABLE, merge-sse2-packed, mod-arith-base, sparc_gencgc_merge, merge-with-19f, snapshot-2004-12, snapshot-2004-11, intl-branch-working-2010-02-11-1000, RELEASE_18a, RELEASE_18b, RELEASE_18c, unicode-snapshot-2009-05, unicode-snapshot-2009-06, amd64-merge-start, ppc_gencgc_snap_2005-12-17, double-double-init-%make-sparc, unicode-utf16-sync-2008-07, release-18e-pre2, unicode-utf16-sync-2008-09, unicode-utf16-extfmts-sync-2008-12, prm-before-macosx-merge-tag, cold-pcl-base, RELEASE_20b, snapshot-2008-04, snapshot-2003-11, snapshot-2005-07, unicode-utf16-sync-label-2009-03-16, RELEASE_19f, snapshot-2007-03, release-20a-base, cross-sol-x86-base, unicode-utf16-char-support-2009-03-26, unicode-utf16-char-support-2009-03-25, release-19a-base, unicode-utf16-extfmts-pre-sync-2008-11, snapshot-2008-10, sparc_gencgc, snapshot-2007-04, snapshot-2010-12, snapshot-2010-11, unicode-utf16-sync-2008-11, snapshot-2007-07, snapshot-2011-09, snapshot-2011-06, snapshot-2011-07, snapshot-2011-04, snapshot-2007-06, snapshot-2011-02, snapshot-2011-03, snapshot-2011-01, snapshot-2003-12, release-19a-pre1, release-19a-pre3, release-19a-pre2, pre-merge-intl-branch, release-19a, UNICODE-BASE, double-double-array-checkpoint, double-double-reader-checkpoint-1, release-19d-base, release-19e-pre1, double-double-irrat-end, release-19e-pre2, snapshot-2010-05, snapshot-2010-04, snapshot-2010-07, snapshot-2010-06, snapshot-2010-01, snapshot-2010-03, snapshot-2010-02, release-19d-pre2, release-19d-pre1, snapshot-2010-08, release-18e, double-double-init-checkpoint-1, double-double-reader-base, label-2009-03-25, snapshot-2005-03, release-19b-base, cross-sol-x86-2010-12-20, double-double-init-x86, sse2-checkpoint-2008-10-01, intl-branch-2010-03-18-1300, snapshot-2005-11, double-double-sparc-checkpoint-1, snapshot-2004-04, sse2-merge-with-2008-11, sse2-merge-with-2008-10, snapshot-2005-10, RELEASE_20a, snapshot-2005-12, release-20a-pre1, snapshot-2005-01, snapshot-2009-11, snapshot-2009-12, unicode-utf16-extfmt-2009-06-11, portable-clx-import-2009-06-16, unicode-utf16-string-support, release-19c-pre1, cross-sparc-branch-base, release-19e-base, intl-branch-base, double-double-irrat-start, snapshot-2005-06, snapshot-2005-05, snapshot-2005-04, ppc_gencgc_snap_2005-05-14, snapshot-2005-02, unicode-utf16-base, portable-clx-base, snapshot-2005-09, snapshot-2005-08, lisp-executable-base, snapshot-2009-08, snapshot-2007-12, snapshot-2007-10, snapshot-2007-11, snapshot-2009-02, snapshot-2009-01, snapshot-2009-07, snapshot-2009-05, snapshot-2009-04, snapshot-2006-02, snapshot-2006-03, release-18e-pre1, snapshot-2006-01, snapshot-2006-06, snapshot-2006-07, snapshot-2006-04, snapshot-2006-05, pre-telent-clx, snapshot-2006-08, snapshot-2006-09, HEAD
Branch point for: release-19b-branch, double-double-reader-branch, double-double-array-branch, mod-arith-branch, RELEASE-19F-BRANCH, portable-clx-branch, sparc_gencgc_branch, cross-sparc-branch, RELEASE-20B-BRANCH, RELENG_18, unicode-string-buffer-branch, sparc-tramp-assem-branch, dynamic-extent, UNICODE-BRANCH, release-19d-branch, ppc_gencgc_branch, sse2-packed-branch, lisp-executable, RELEASE-20A-BRANCH, amd64-dd-branch, double-double-branch, unicode-string-buffer-impl-branch, intl-branch, release-18e-branch, cold-pcl, unicode-utf16-branch, cross-sol-x86-branch, release-19e-branch, sse2-branch, release-19a-branch, release-19c-branch, intl-2-branch, unicode-utf16-extfmt-branch
Changes since 1.2: +2 -1 lines
Added netnews.lisp
1 ;;;
2 ;;; **********************************************************************
3 ;;; This code was written as part of the CMU Common Lisp project at
4 ;;; Carnegie Mellon University, and has been placed in the public domain.
5 ;;; If you want to use this code or any part of CMU Common Lisp, please contact
6 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
7 ;;;
8 (ext:file-comment
9 "$Header: /tiger/var/lib/cvsroots/cmucl/src/tools/hemload.lisp,v 1.3 1991/07/29 08:56:59 chiles Rel $")
10 ;;;
11 ;;; **********************************************************************
12 ;;;
13 ;;; This file loads all of Hemlock.
14 ;;;
15
16 ;;; Stuff to set up the packages Hemlock uses.
17 ;;;
18 (in-package "HEMLOCK-INTERNALS"
19 :nicknames '("HI")
20 :use '("LISP" "EXTENSIONS" "SYSTEM"))
21 ;;;
22 (in-package "HEMLOCK"
23 :nicknames '("ED")
24 :use '("LISP" "HEMLOCK-INTERNALS" "EXTENSIONS" "SYSTEM"))
25 ;;;
26 (in-package "SYSTEM")
27 (export '(%sp-byte-blt %sp-find-character %sp-find-character-with-attribute
28 %sp-reverse-find-character-with-attribute))
29 ;;;
30 (in-package "HI")
31
32
33 (defun build-hemlock ()
34 (load "hem:struct")
35 ; (load "hem:struct-ed")
36 (load "hem:charmacs")
37 (load "hem:key-event")
38 (ext::re-initialize-key-events)
39 (load "hem:keysym-defs")
40 (load "hem:input")
41 (load "hem:line")
42 (load "hem:ring")
43 (load "hem:vars")
44 (load "hem:buffer")
45 (load "hem:macros")
46 (load "hem:interp")
47 (load "hem:syntax")
48 (load "hem:htext1")
49 (load "hem:htext2")
50 (load "hem:htext3")
51 (load "hem:htext4")
52 (load "hem:files")
53 (load "hem:search1")
54 (load "hem:search2")
55 (load "hem:table")
56 #+clx (load "hem:hunk-draw")
57 ; (load "hem:bit-stream")
58 (load "hem:window")
59 (load "hem:screen")
60 (load "hem:winimage")
61 (load "hem:linimage")
62 (load "hem:display")
63 (load "hem:termcap")
64 #+clx (load "hem:bit-display")
65 (load "hem:tty-disp-rt")
66 (load "hem:tty-display")
67 ; (load "hem:tty-stream")
68 (load "hem:pop-up-stream")
69 #+clx (load "hem:bit-screen")
70 (load "hem:tty-screen")
71 (load "hem:cursor")
72 (load "hem:font")
73 (load "hem:streams")
74 (load "hem:main")
75 (load "hem:hacks")
76 (%init-hemlock)
77 (load "hem:echo")
78 (load "hem:echocoms")
79 (load "hem:command")
80 (load "hem:indent")
81 (load "hem:comments")
82 (load "hem:morecoms")
83 (load "hem:undo")
84 (load "hem:killcoms")
85 (load "hem:searchcoms")
86 (load "hem:filecoms")
87 (load "hem:doccoms")
88 (load "hem:srccom")
89 (load "hem:group")
90 (load "hem:fill")
91 (load "hem:text")
92 (load "hem:lispmode")
93 (load "hem:ts-buf")
94 (load "hem:ts-stream")
95 (load "hem:eval-server")
96 (load "hem:lispbuf")
97 (load "hem:lispeval")
98 (load "hem:spell-rt")
99 (load "hem:spell-corr")
100 (load "hem:spell-aug")
101 (load "hem:spellcoms")
102 (load "hem:overwrite")
103 (load "hem:abbrev")
104 (load "hem:icom")
105 (load "hem:kbdmac")
106 (load "hem:defsyn")
107 (load "hem:scribe")
108 (load "hem:pascal")
109 (load "hem:edit-defs")
110 (load "hem:auto-save")
111 (load "hem:register")
112 (load "hem:xcoms")
113 (load "hem:unixcoms")
114 (load "hem:mh")
115 (load "hem:highlight")
116 (load "hem:dired")
117 (load "hem:diredcoms")
118 (load "hem:bufed")
119 (load "hem:lisp-lib")
120 (load "hem:completion")
121 (load "hem:shell")
122 (load "hem:debug")
123 (load "hem:netnews")
124 (load "hem:bindings"))

  ViewVC Help
Powered by ViewVC 1.1.5