Changeset 13497 in project


Ignore:
Timestamp:
03/05/09 06:39:12 (11 years ago)
Author:
Kon Lovett
Message:

%generic-structure? -> structure?

Location:
release/4/box
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/box/tags/2.0.0/box.scm

    r13492 r13497  
    155155(define (box-set! box value)
    156156  (cond
    157     [(%generic-structure? box)
     157    [(%structure? box)
    158158      (case (%structure-tag box)
    159159        [(box)
  • release/4/box/trunk/box.scm

    r13492 r13497  
    155155(define (box-set! box value)
    156156  (cond
    157     [(%generic-structure? box)
     157    [(%structure? box)
    158158      (case (%structure-tag box)
    159159        [(box)
Note: See TracChangeset for help on using the changeset viewer.