summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1992-03-16 20:39:07 +0000
committerJim Blandy <jimb@redhat.com>1992-03-16 20:39:07 +0000
commit49116ac071969bee7f129bf7ce725c7a5b0b0fc5 (patch)
tree60c249f15b04478367256fef95c6fd7557f263b9 /lisp/emacs-lisp
parent3b4a6e271d44955328c39de1475e42cf0b4cd637 (diff)
downloademacs-49116ac071969bee7f129bf7ce725c7a5b0b0fc5.tar.gz
emacs-49116ac071969bee7f129bf7ce725c7a5b0b0fc5.tar.bz2
emacs-49116ac071969bee7f129bf7ce725c7a5b0b0fc5.zip
*** empty log message ***
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/backquote.el5
-rw-r--r--lisp/emacs-lisp/float.el5
-rw-r--r--lisp/emacs-lisp/helper.el3
-rw-r--r--lisp/emacs-lisp/lisp-mode.el5
4 files changed, 11 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index 82cd99a114a..0b5283ca819 100644
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -57,8 +57,6 @@
;;; this or changing the syntax to ... ,(<form>). RMS: opinion?
-(provide 'backquote)
-
;;; a raft of general-purpose macros follows. See the nearest
;;; Commonlisp manual.
(defmacro bq-push (v l)
@@ -353,3 +351,6 @@ for making the list so far."
(defun bq-splicenil (form)
(setq state 'append
tailmaker (list form)))
+
+(provide 'backquote)
+
diff --git a/lisp/emacs-lisp/float.el b/lisp/emacs-lisp/float.el
index 68b88f41ecc..3c2921c506f 100644
--- a/lisp/emacs-lisp/float.el
+++ b/lisp/emacs-lisp/float.el
@@ -46,8 +46,6 @@
;; June 20, 1986
;;
-(provide 'float)
-
;; fundamental implementation constants
(defconst exp-base 2
"Base of exponent in this floating point representation.")
@@ -446,3 +444,6 @@ are recognized."
(funcall func exponent (aref powers-of-10 tens)))))
_f0)) ; if invalid, return 0
+
+(provide 'float)
+
diff --git a/lisp/emacs-lisp/helper.el b/lisp/emacs-lisp/helper.el
index c718e94be30..0064bc66e07 100644
--- a/lisp/emacs-lisp/helper.el
+++ b/lisp/emacs-lisp/helper.el
@@ -21,7 +21,7 @@
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
-(provide 'helper) ; hey, here's a helping hand.
+; hey, here's a helping hand.
;; Bind this to a string for <blank> in "... Other keys <blank>".
;; Helper-help uses this to construct help string when scrolling.
@@ -147,3 +147,4 @@
(ding)
(setq continue nil))))))
+(provide 'helper) \ No newline at end of file
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 0f9193a71c7..78310112c10 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -17,8 +17,6 @@
;; along with GNU Emacs; see the file COPYING. If not, write to
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
-(provide 'lisp-mode)
-
(defvar lisp-mode-syntax-table nil "")
(defvar emacs-lisp-mode-syntax-table nil "")
(defvar lisp-mode-abbrev-table nil "")
@@ -613,3 +611,6 @@ means don't indent that line."
(progn
(forward-line 1) (point))
nil nil state))))))
+
+(provide 'lisp-mode)
+