Go to:
Gentoo Home
Documentation
Forums
Lists
Bugs
Planet
Store
Wiki
Get Gentoo!
Gentoo's Bugzilla – Attachment 142449 Details for
Bug 208522
dev-lisp/cmucl-19d_p2 - add support for dev-lisp/gentoo-init
Home
|
New
–
[Ex]
|
Browse
|
Search
|
Privacy Policy
|
[?]
|
Reports
|
Requests
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
Site init file
site-init.lisp.in (text/plain), 1.91 KB, created by
Stelian Ionescu
on 2008-02-02 00:15:45 UTC
(
hide
)
Description:
Site init file
Filename:
MIME Type:
Creator:
Stelian Ionescu
Created:
2008-02-02 00:15:45 UTC
Size:
1.91 KB
patch
obsolete
>;;; -*- Mode: Lisp; Package: System -*- >;;; >;;; ********************************************************************** >;;; This code was written as part of the CMU Common Lisp project at >;;; Carnegie Mellon University, and has been placed in the public domain. >;;; > >;;; Heavy modifications by Peter Van Eynde > >;;; More modifications for Gentoo by Matthew Kennedy >;;; <mkennedy@gentoo.org> > >(in-package "SYSTEM") > >(ext:without-package-locks > (defun lisp-implementation-version () > (format nil "~X-~A" c:byte-fasl-file-version "@VERSION@"))) > >(if (probe-file "/etc/lisp-config.lisp") > (load "/etc/lisp-config.lisp") > (format t "~%;;; Warning: There is no /etc/lisp-config.lisp file (which should have been created during emerge")) > >;;; If you have sources installed on your system, un-comment the following form >;;; and change it to point to the source location. This will allow the Hemlock >;;; "Edit Definition" command and the debugger to find sources for functions in >;;; the core. >(when (probe-file #p"/usr/share/common-lisp/source/cmucl/") > (setf (ext:search-list "target:") > '( > "/usr/share/common-lisp/source/cmucl/" ; object dir > ))) > >;;; (setf (ext:search-list "library:") '("/usr/lib/cmucl/lib/")) >;;; for safety... > >;;; optional extentions to the lisp image: delete if you >;;; don't like them :-). >(in-package :common-lisp-user) > >;;; newbie functions, delete if you don't like them > >(defun help () > (format t "~ >Welcome to the Gentoo GNU/Linux port of CMUCL. > >The CMUCL REPL does not have GNU Readline-like support, however >you may wish to install rlwap (see: app-misc/rlwrap) to achieve >the same effect. > >If you think you found a bug, please use http://bugs.gentoo.org/ > >Read the documentation in /usr/share/doc/@PF@. > >(quit) exit Lisp >(describe 'foo) gives information about foo >(inspect '*foo*) interactively inspects *foo* >(apropos \"foo\") briefly describe all symbols which match \"foo\" >"))
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Raw
Actions:
View
Attachments on
bug 208522
:
142447
| 142449 |
142620