← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/ecl/intrepid

« back to all changes in this revision

Viewing changes to src/clos/kernel.lsp

  • Committer: Bazaar Package Importer
  • Author(s): Peter Van Eynde
  • Date: 2007-04-09 11:51:51 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20070409115151-ql8cr0kalzx1jmla
Tags: 0.9i-20070324-2
Upload to unstable. 

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/clos/kernel.lsp
92
92
                  ;; use fixnums as limits for efficiency:
93
93
                  :size *default-method-cache-size*
94
94
                  :rehash-size #.(/ *default-method-cache-size* 2)
95
 
                  :rehash-threshold 0.5s0))
 
95
                  :rehash-threshold 0.5f0))
96
96
      (spec-list :initform nil :accessor generic-function-spec-list)
97
97
      (method-combination 
98
98
       :initarg :method-combination :initform '(standard)
208
208
                   ;; use fixnums as limits for efficiency:
209
209
                   :size *default-method-cache-size*
210
210
                   :rehash-size #.(/ *default-method-cache-size* 2)
211
 
                   :rehash-threshold 0.5s0)))
 
211
                   :rehash-threshold 0.5f0)))
212
212
        (declare (type standard-object gfun))
213
213
        ;; create a new gfun
214
214
        (si::instance-sig-set gfun)