Ignore:
Timestamp:
02/02/09 09:21:50 (11 years ago)
Author:
Kon Lovett
Message:

c-platform.scm : ##sys#pointer? rewrite -> C_anypointerp
library.scm : C_pointerp -> C_anypointerp

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/branches/chicken-3/library.scm

    r13143 r13149  
    38303830(define ##sys#make-pointer (##core#primitive "C_make_pointer"))
    38313831(define ##sys#make-tagged-pointer (##core#primitive "C_make_tagged_pointer"))
    3832 (define (##sys#pointer? x) (##core#inline "C_pointerp" x))
     3832(define (##sys#pointer? x) (##core#inline "C_anypointerp" x))
    38333833(define (##sys#set-pointer-address! ptr addr) (##core#inline "C_update_pointer" addr ptr))
    38343834(define (##sys#bytevector? x) (##core#inline "C_bytevectorp" x))
Note: See TracChangeset for help on using the changeset viewer.