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