Update of /cvsroot/hoc/hoc/HOC
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12412/HOC
Modified Files:
HOC.hs
Log Message:
Add utility function
withExportedArray :: (HOC.Arguments.ObjCArgument a b)
=> [a] -> (GHC.Ptr.Ptr b -> IO c) -> IO c
Index: HOC.hs
===================================================================
RCS file: /cvsroot/hoc/hoc/HOC/HOC.hs,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- HOC.hs 27 Sep 2005 11:55:22 -0000 1.12
+++ HOC.hs 17 Mar 2006 04:57:36 -0000 1.13
@@ -7,6 +7,7 @@
ClassAndObject,
( # ), ( #* ),
ObjCArgument(..),
+ withExportedArray,
castObject,
declareClass,
declareSelector,
|