Changeset 37821 in project


Ignore:
Timestamp:
08/04/19 14:27:02 (4 months ago)
Author:
sjamaan
Message:

srfi-18: Use ##sys#check-fixnum instead of ##sys#check-exact on indices

In CHICKEN 4, ##sys#check-exact was what we now call ##sys#check-fixnum
but the SRFI-18 code hasn't been updated to match it.

Fixes #1631

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/5/srfi-18/trunk/srfi-18.scm

    r35501 r37821  
    195195(define (thread-quantum-set! thread q)
    196196  (##sys#check-structure thread 'thread 'thread-quantum-set!)
    197   (##sys#check-exact q 'thread-quantum-set!)
     197  (##sys#check-fixnum q 'thread-quantum-set!)
    198198  (##sys#setislot thread 9 (fxmax q 10)) )
    199199
     
    518518
    519519(define (thread-wait-for-i/o! fd #!optional (mode #:all))
    520   (##sys#check-exact fd 'thread-wait-for-i/o!)
     520  (##sys#check-fixnum fd 'thread-wait-for-i/o!)
    521521  (##sys#thread-block-for-i/o! ##sys#current-thread fd mode)
    522522  (thread-yield!) )
Note: See TracChangeset for help on using the changeset viewer.