classes.struct: moving to new/boa instead of <struct>/<struct-boa>

[factor.git] / basis / cocoa / types / types.factor

diff --git a/basis/cocoa/types/types.factor b/basis/cocoa/types/types.factor
index 9c3058ab358776569ec2bf526a76c39664f52e08..43e0a238aea77cfae05a75e5794b68bac54f7b4a 100644 (file)
--- a/basis/cocoa/types/types.factor
+++ b/basis/cocoa/types/types.factor
@@ -22,6 +22,8 @@ STRUCT: NSRange
     { location NSUInteger }
     { length NSUInteger } ;
 
+C: <NSRange> NSRange
+
 TYPEDEF: NSRange _NSRange
 
 ! The "lL" type encodings refer to 32-bit values even in 64-bit mode
@@ -29,9 +31,6 @@ TYPEDEF: int long32
 TYPEDEF: uint ulong32
 TYPEDEF: void* unknown_type
 
-: <NSRange> ( location length -- size )
-    NSRange <struct-boa> ;
-
 STRUCT: NSFastEnumerationState
     { state ulong }
     { itemsPtr id* }