Commit 0508aa26 authored by Paul Eggert's avatar Paul Eggert

Spelling fixes

parent ad9e659b
...@@ -299,9 +299,9 @@ Optional argument IGNORE is an extraneous parameter." ...@@ -299,9 +299,9 @@ Optional argument IGNORE is an extraneous parameter."
(props (cl--slot-descriptor-props slot)) (props (cl--slot-descriptor-props slot))
(cust (alist-get :custom props))) (cust (alist-get :custom props)))
;; ;;
;; Shouldn't i be incremented unconditionnaly ? Or ;; Shouldn't I be incremented unconditionally? Or
;; better shouldn't we simply mapc on the slots vector ;; better shouldn't we simply mapc on the slots vector
;; avoiding use of this integer variable ? PLN Sat May ;; avoiding use of this integer variable? PLN Sat May
;; 2 07:35:45 2015 ;; 2 07:35:45 2015
;; ;;
(setq i (+ i 1)) (setq i (+ i 1))
......
...@@ -444,7 +444,7 @@ ...@@ -444,7 +444,7 @@
(should (eq nums (cl-adjoin 2 nums :test-not myfn-p))) ; 1 matches (should (eq nums (cl-adjoin 2 nums :test-not myfn-p))) ; 1 matches
(should (eq nums (cl-adjoin 3 nums :test-not myfn-p))) ; 1 and 2 matches (should (eq nums (cl-adjoin 3 nums :test-not myfn-p))) ; 1 and 2 matches
;; according to CLTL2 passing both :test and :test-not should signal error ;; according to CLtL2 passing both :test and :test-not should signal error
;;(should-error (cl-adjoin 3 nums :test 'myfn-p :test-not myfn-p)) ;;(should-error (cl-adjoin 3 nums :test 'myfn-p :test-not myfn-p))
;; own :key fn ;; own :key fn
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment