Changeset 5443 in project


Ignore:
Timestamp:
08/16/07 05:29:13 (13 years ago)
Author:
Kon Lovett
Message:

Chg for misc-extn 3.0

Location:
bloom-filter
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • bloom-filter/bloom-filter-eggdoc.scm

    r1412 r5443  
    3232                (author (url "mailto:klovett@pacbell.net" "Kon Lovett"))
    3333                (history
     34                        (version "1.101" "Dropped :optional")
    3435                        (version "1.1" "Support for \"optimal K\"")
    3536                        (version "1.0" "Exports")
  • bloom-filter/bloom-filter.html

    r3411 r5443  
    158158<h3>Version</h3>
    159159<ul>
     160<li>1.101 Dropped :optional</li>
    160161<li>1.1 Support for &quot;optimal K&quot;</li>
    161162<li>1.0 Exports</li>
  • bloom-filter/bloom-filter.scm

    r5065 r5443  
    1515;; - No ability to add message-digest-primitives at runtime.
    1616
    17 (use srfi-1 utils iset message-digest hash-utils lookup-table misc-extn mathh-int)
     17(use srfi-1 utils)
     18(use iset message-digest hash-utils lookup-table misc-extn-control misc-extn-numeric misc-extn-record mathh-int)
    1819
    1920(eval-when (compile)
     
    234235        (ensure-positive-fixnum n 'bloom-filter:desired-m)
    235236        (let loop ([m n])
    236                 (let* ([k (:optional r (bloom-filter:optimum-k n m))]
     237                (let* ([k (optional r (bloom-filter:optimum-k n m))]
    237238                                         [calc-p (bloom-filter:p-false-positive k n m)])
    238239                        (if (<= calc-p p)
     
    251252        (bloom-filter:p-false-positive
    252253                (%bloom-filter-k bf)
    253                 (:optional n (%bloom-filter-n bf))
     254                (optional n (%bloom-filter-n bf))
    254255                (%bloom-filter-m bf)) )
    255256
  • bloom-filter/bloom-filter.setup

    r5112 r5443  
    11(include "setup-header")
     2
     3(required-extension-version 'misc-extn "3.0")
    24
    35(copy-to-repository "hash-primitives-info")
    46
    5 (install-dynld+docu bloom-filter "1.1")
     7(install-dynld+docu bloom-filter "1.101")
    68
    79(install-test '("bloom-filter-test.scm" "bloom-filter-word-list.txt"))
Note: See TracChangeset for help on using the changeset viewer.