Changeset 9353 in project


Ignore:
Timestamp:
03/09/08 15:21:37 (12 years ago)
Author:
Alex Shinn
Message:

Fixing identifier* definitions.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/3/riaxpander/chicken.scm

    r9348 r9353  
    4444
    4545;; syntactic-closures egg compatibility
    46 (define identifier? name?)
    47 (define identifier=? name=?)
    48 (define identifier->symbol name->symbol)
     46(define (identifier? obj) (name? obj))
     47(define (identifier=? env1 id1 env2 id2) (name=? env1 id1 env2 id2))
     48(define (identifier->symbol id) (name->symbol id))
    4949
    5050(define (syntax-error message history . irritants)
Note: See TracChangeset for help on using the changeset viewer.