[hoc-cvs] hoc/HOC HOC.conf.in,1.3,1.4 HOC.hs,1.11,1.12

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

Update of /cvsroot/hoc/hoc/HOC
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12043/HOC

Modified Files:
	HOC.conf.in HOC.hs 
Log Message:
A monster commit, brought to you by the Greater Toronto Airport Authority
and Czech Airlines.

HOC now supports:

* Marshalling of exceptions
    NSExceptions get marshalled into Haskell exceptions that can be caught
    using Foundation.NSException.catchNS.
    Haskell exceptions get wrapped in a (private) subclass of NSException
    and marshalled back if they re-enter Haskell land.

* importing of extern constants
    $(declareExternConst "NSDeviceRGBColorSpace" [t| NSString () |])

* importing of global functions (e.g. NSRectFill) using HOC marshalling:
    $(declareExternFun "NSRectFill" [t| NSRect -> IO () |])

* ifgen generates constant & function declarations automatically from
  Foundation and AppKit headers.



Index: HOC.hs
===================================================================
RCS file: /cvsroot/hoc/hoc/HOC/HOC.hs,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- HOC.hs	30 Jul 2005 02:41:53 -0000	1.11
+++ HOC.hs	27 Sep 2005 11:55:22 -0000	1.12
@@ -41,6 +41,9 @@
         declareCEnum,
         declareAnonymousCEnum,
         
+        declareExternConst,
+        declareExternFun,
+        
         -- debugging & statistics:
         
         objectMapStatistics
@@ -61,3 +64,5 @@
 import HOC.NewlyAllocated
 import HOC.Super
 import HOC.CEnum
+import HOC.ExternConstants
+import HOC.ExternFunctions

Index: HOC.conf.in
===================================================================
RCS file: /cvsroot/hoc/hoc/HOC/HOC.conf.in,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- HOC.conf.in	29 Jul 2005 03:39:43 -0000	1.3
+++ HOC.conf.in	27 Sep 2005 11:55:22 -0000	1.4
@@ -23,7 +23,11 @@
     HOC.NewClass,
     HOC.Super,
     HOC.CEnum,
-    HOC.NameCaseChange
+    HOC.NameCaseChange,
+    HOC.Dyld,
+    HOC.ExternConstants,
+    HOC.Exception,
+    HOC.ExternFunctions
 
 hs-libraries:       "HOC", "HOC_cbits"
 depends:            base, template-haskell