Changeset 39165 in project

Timestamp:

11/08/20 16:30:07 (2 months ago)

Author:

Kon Lovett

Message:

incl bug so no types, just alias, bump ver

Location:

release/5/box/trunk

Files:

• box.egg (modified) (1 diff)
• srfi-111.scm (modified) (1 diff)
• tests/box-test.scm (modified) (1 diff)

release/5/box/trunk/box.egg

@@ -3 +3 @@
 
 ((synopsis "Boxing")
- (version "3.2.4")
+ (version "3.3.0")
  (category data)
  (license "BSD")

release/5/box/trunk/srfi-111.scm

@@ -11 +11 @@
   immutable-box)
 
-(import scheme)
-(import (chicken base))
-(import (chicken syntax))
-(import (chicken type))
-(import (only (chicken platform) register-feature!))
-(import (only box-core box? make-box-mutable make-box-immutable box-ref box-set!))
+(import scheme
+  (chicken base)
+  (only (chicken platform) register-feature!)
+  (only box-core box? make-box-mutable make-box-immutable box-ref box-set!))
 
 ;;
 
-(define (box arg)           (make-box-mutable arg))
-(define (immutable-box arg) (make-box-immutable arg))
-(define (unbox box)         (box-ref box))
-(define (set-box! box val)  (box-set! box val))
+(define box           make-box-mutable)
+(define immutable-box make-box-immutable)
+(define unbox         box-ref)
+(define set-box!      box-set!)
 
 ;;

release/5/box/trunk/tests/box-test.scm

@@ -15 +15 @@
 
 ;should be there
+#; ;BUG incl file w/ dest override
 (include "box.types")