From cb282edba49f2352c079b8933b5ceb307d5cae31 Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Wed, 12 May 2010 02:49:35 +0000 Subject: [PATCH] Update call to PROVIDE to use the module name. (Not really needed since the modules use asdf now.) --- contrib/embedded-c/embedded-c.lisp | 2 +- contrib/games/feebs/feebs.lisp | 4 ++-- contrib/hist/hist.lisp | 2 +- contrib/psgraph/psgraph.lisp | 2 +- contrib/sprof/sprof.lisp | 2 +- 5 files changed, 6 insertions(+), 6 deletions(-) diff --git a/contrib/embedded-c/embedded-c.lisp b/contrib/embedded-c/embedded-c.lisp index 8ff12644e..0e4d5c855 100644 --- a/contrib/embedded-c/embedded-c.lisp +++ b/contrib/embedded-c/embedded-c.lisp @@ -270,4 +270,4 @@ (defstub coredumpp ((status :int) => :int) "return WCOREDUMP(status);")) -(provide "contrib-embedded-c") +(provide "EMBEDDED-C") diff --git a/contrib/games/feebs/feebs.lisp b/contrib/games/feebs/feebs.lisp index fffd75dd1..e2a24613b 100644 --- a/contrib/games/feebs/feebs.lisp +++ b/contrib/games/feebs/feebs.lisp @@ -16,7 +16,7 @@ ;;; ;;; To see a demo, compile and load feebs.lisp then type (feebs:feebs). ;;; -;;; $Id: feebs.lisp,v 1.7 2009/09/09 15:51:27 rtoy Rel $ +;;; $Id: feebs.lisp,v 1.8 2010/05/12 02:49:35 rtoy Rel $ ;;; (cl:in-package "COMMON-LISP") @@ -1982,4 +1982,4 @@ (t :turn-around)))) -(provide "contrib-games-feebs") +(provide "FEEBS") diff --git a/contrib/hist/hist.lisp b/contrib/hist/hist.lisp index a995ef1cf..d2388cadb 100644 --- a/contrib/hist/hist.lisp +++ b/contrib/hist/hist.lisp @@ -88,4 +88,4 @@ (t (incf (svref *hist-array* (floor (- value *hist-lower-limit*) *hist-bucket-size*)))))) -(provide "contrib-hist") +(provide "HIST") diff --git a/contrib/psgraph/psgraph.lisp b/contrib/psgraph/psgraph.lisp index 1abf0f773..ddc373c0b 100644 --- a/contrib/psgraph/psgraph.lisp +++ b/contrib/psgraph/psgraph.lisp @@ -568,4 +568,4 @@ (setf (gethash (list x y) *ancestor-cache*) (list cached-value)) cached-value)))) -(provide "contrib-psgraph") +(provide "PSGRAPH") diff --git a/contrib/sprof/sprof.lisp b/contrib/sprof/sprof.lisp index b0e4da876..4a4315674 100644 --- a/contrib/sprof/sprof.lisp +++ b/contrib/sprof/sprof.lisp @@ -1342,5 +1342,5 @@ :verbose nil :print nil :progress nil)))) -(provide "contrib-sprof") +(provide "SPROF") ;;; End of file. -- GitLab