git.iko.soy/typeable/hexml
on master help sign in
Merge pull request #11 from dbeacham/unsafe-ffi
854cdb9Neil Mitchell
src/Text/XML/Hexml.hs+6−6
compare with master
unifiedsplit
@@ -49,14 +49,14 @@ foreign import ccall hexml_document_parse :: CString -> CInt -> IO (Ptr CDocumen
49foreign import ccall hexml_document_free :: Ptr CDocument -> IO ()
49foreign import ccall hexml_document_free :: Ptr CDocument -> IO ()
50foreign import ccall "&hexml_document_free" hexml_document_free_funptr :: FunPtr (Ptr CDocument -> IO ())
50foreign import ccall "&hexml_document_free" hexml_document_free_funptr :: FunPtr (Ptr CDocument -> IO ())
51foreign import ccall hexml_node_render :: Ptr CDocument -> Ptr CNode -> CString -> CInt -> IO CInt
51foreign import ccall hexml_node_render :: Ptr CDocument -> Ptr CNode -> CString -> CInt -> IO CInt
52−foreign import ccall hexml_document_error :: Ptr CDocument -> IO CString
52+foreign import ccall unsafe hexml_document_error :: Ptr CDocument -> IO CString
53−foreign import ccall hexml_document_node :: Ptr CDocument -> IO (Ptr CNode)
53+foreign import ccall unsafe hexml_document_node :: Ptr CDocument -> IO (Ptr CNode)
54
54
55−foreign import ccall hexml_node_children :: Ptr CDocument -> Ptr CNode -> Ptr CInt -> IO (Ptr CNode)
55+foreign import ccall unsafe hexml_node_children :: Ptr CDocument -> Ptr CNode -> Ptr CInt -> IO (Ptr CNode)
56−foreign import ccall hexml_node_attributes :: Ptr CDocument -> Ptr CNode -> Ptr CInt -> IO (Ptr CAttr)
56+foreign import ccall unsafe hexml_node_attributes :: Ptr CDocument -> Ptr CNode -> Ptr CInt -> IO (Ptr CAttr)
57
57
58−foreign import ccall hexml_node_child :: Ptr CDocument -> Ptr CNode -> Ptr CNode -> CString -> CInt -> IO (Ptr CNode)
58+foreign import ccall unsafe hexml_node_child :: Ptr CDocument -> Ptr CNode -> Ptr CNode -> CString -> CInt -> IO (Ptr CNode)
59−foreign import ccall hexml_node_attribute :: Ptr CDocument -> Ptr CNode -> CString -> CInt -> IO (Ptr CAttr)
59+foreign import ccall unsafe hexml_node_attribute :: Ptr CDocument -> Ptr CNode -> CString -> CInt -> IO (Ptr CAttr)
60
60
61-- | A node in an XML document, created by 'parse', then calling functions such
61-- | A node in an XML document, created by 'parse', then calling functions such
62-- as 'children' on that initial 'Node'.
62-- as 'children' on that initial 'Node'.