[hoc-cvs] hoc/Bindings/AdditionalCode/Foundation NSRange.hs, 1.2, 1.3

[Wolfgang T. <wth...@us...>]

Update of /cvsroot/hoc/hoc/Bindings/AdditionalCode/Foundation
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv2631/Bindings/AdditionalCode/Foundation

Modified Files:
	NSRange.hs 
Log Message:
Correctly export anonymous enum constants in the interface generator.
(and adjust NSRange.hs accordingly)


Index: NSRange.hs
===================================================================
RCS file: /cvsroot/hoc/hoc/Bindings/AdditionalCode/Foundation/NSRange.hs,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- NSRange.hs	5 Oct 2005 03:14:39 -0000	1.2
+++ NSRange.hs	5 Feb 2007 16:11:31 -0000	1.3
@@ -7,7 +7,6 @@
 --X NSRangePointer
 --X nsMaxRange
 --X nsLocationInRange
---X nsNotFound
 
 import HOC.FFICallInterface
 import HOC.Arguments
@@ -22,7 +21,6 @@
 
 nsMaxRange (NSRange loc len) = loc + len
 nsLocationInRange x (NSRange loc len) = x >= loc && x < loc+len
-nsNotFound = 0x7fffffff :: CUInt
 
 instance Storable NSRange where
     alignment _ = alignment (undefined :: CUInt)