X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=harpy.git;a=blobdiff_plain;f=Harpy%2FCall.hs;fp=Harpy%2FCall.hs;h=47ada4d5165648b5f0854a21583c67241d4f5deb;hp=76d4af505fb4fd92c5b33230c6e84232266d4658;hb=3a2da15c70ffe7c138820586d7587ef0c890ff2b;hpb=145787f5bde62a3b2a986f10f568cf27ec9f2db8

diff --git a/Harpy/Call.hs b/Harpy/Call.hs
index 76d4af5..47ada4d 100644
--- a/Harpy/Call.hs
+++ b/Harpy/Call.hs
@@ -23,8 +23,8 @@ import Foreign.Ptr
 #ifndef __HADDOCK__
 
 $(callDecl "callAsVoid" [t|()|])
-$(callDecl "callAsWord32ToWord32" [t|Word32 -> Word32|])
-$(callDecl "callAs7PtrToVoid" [t|forall a b c d e f g . Ptr a -> Ptr b -> Ptr c -> Ptr d -> Ptr e -> Ptr f -> Ptr g -> () |])
+-- $(callDecl "callAsWord32ToWord32" [t|Word32 -> Word32|])
+-- $(callDecl "callAs7PtrToVoid" [t|forall a b c d e f g . Ptr a -> Ptr b -> Ptr c -> Ptr d -> Ptr e -> Ptr f -> Ptr g -> () |])
 
 #else