Changeset 39775 in project


Ignore:
Timestamp:
04/02/21 13:32:26 (3 weeks ago)
Author:
juergen
Message:

arrays 1.0.2 with bugfix in tests

Location:
release/5/arrays
Files:
4 edited
1 copied

Legend:

Unmodified
Added
Removed
  • release/5/arrays/tags/1.0.2/arrays.egg

    r38298 r39775  
    55 (test-dependencies simple-tests)
    66 (author "Juergen Lorenz")
    7  (version "1.0.1")
     7 (version "1.0.2")
    88 (components
    99   (extension arrays
  • release/5/arrays/tags/1.0.2/tests/run.scm

    r37416 r39775  
    33        (chicken random) (chicken fixnum))
    44
    5 (define arr (make-array number?))
    6 (define copied (make-array number?));(array-copy arr))
    7 (define arr0 (array 0))
    8 (define arr1 (make-array number?))
    9 (define rar (make-array number?))
    10 
    115(define-test (arrays?)
     6  (set! arr (make-array number?))
     7  (set! copied (make-array number?));(array-copy arr))
     8  (set! arr0 (array 0))
     9  (set! arr1 (make-array number?))
     10  (set! rar (make-array number?))
    1211  (array? arr)
    1312  (array-null? arr)
     
    152151  )
    153152
    154 (define st (make-set =))
    155153
    156154(define-test (sets?)
     155  (set! st (make-set =))
    157156  (set? st)
    158157  (set-null? st)
  • release/5/arrays/trunk/arrays.egg

    r38298 r39775  
    55 (test-dependencies simple-tests)
    66 (author "Juergen Lorenz")
    7  (version "1.0.1")
     7 (version "1.0.2")
    88 (components
    99   (extension arrays
  • release/5/arrays/trunk/tests/run.scm

    r37416 r39775  
    33        (chicken random) (chicken fixnum))
    44
    5 (define arr (make-array number?))
    6 (define copied (make-array number?));(array-copy arr))
    7 (define arr0 (array 0))
    8 (define arr1 (make-array number?))
    9 (define rar (make-array number?))
    10 
    115(define-test (arrays?)
     6  (set! arr (make-array number?))
     7  (set! copied (make-array number?));(array-copy arr))
     8  (set! arr0 (array 0))
     9  (set! arr1 (make-array number?))
     10  (set! rar (make-array number?))
    1211  (array? arr)
    1312  (array-null? arr)
     
    152151  )
    153152
    154 (define st (make-set =))
    155153
    156154(define-test (sets?)
     155  (set! st (make-set =))
    157156  (set? st)
    158157  (set-null? st)
Note: See TracChangeset for help on using the changeset viewer.