Changeset 40040 in project


Ignore:
Timestamp:
04/21/21 22:30:18 (3 weeks ago)
Author:
Kon Lovett
Message:

remove use of fx routines

Location:
release/5/srfi-27/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/5/srfi-27/trunk/entropy-windows.scm

    r40037 r40040  
    127127              (lambda ()
    128128                (let ((ch (u8vector-ref buf pos)))
    129                   (set! pos (fx+ pos 1))
     129                  (set! pos (+ pos 1))
    130130                  (integer->char ch) ) ) ) )
    131131        ;Binary input port w/o lookahead, string, and line support
    132132        (make-input-port
    133133          (lambda ()                    ;Read
    134             (when (fx>= pos len) (fillbuff))
     134            (when (>= pos len) (fillbuff))
    135135            (getchar) )
    136136          (lambda ()                    ;Ready?
  • release/5/srfi-27/trunk/srfi-27.egg

    r40037 r40040  
    22
    33((synopsis "Sources of Random Bits")
    4  (version "4.1.4")
     4 (version "4.1.5")
    55 (category data)
    66 (author "Sebastian Egner, for CHICKEN by Kon Lovett and [[Sergey Goldgaber]]")
Note: See TracChangeset for help on using the changeset viewer.