summaryrefslogtreecommitdiff
path: root/packages/sundials/src/Bar.hsc
diff options
context:
space:
mode:
Diffstat (limited to 'packages/sundials/src/Bar.hsc')
-rw-r--r--packages/sundials/src/Bar.hsc8
1 files changed, 4 insertions, 4 deletions
diff --git a/packages/sundials/src/Bar.hsc b/packages/sundials/src/Bar.hsc
index b1159b6..434c4d4 100644
--- a/packages/sundials/src/Bar.hsc
+++ b/packages/sundials/src/Bar.hsc
@@ -14,11 +14,11 @@ import Foreign.C.String
14 14
15 15
16getContentPtr :: Storable a => Ptr b -> IO a 16getContentPtr :: Storable a => Ptr b -> IO a
17getContPtr ptr = (#peek BarType, content) ptr 17getContentPtr ptr = (#peek BarType, content) ptr
18 18
19getData :: Storable a => Ptr b -> IO a
19getData ptr = (#peek BazType, data) ptr 20getData ptr = (#peek BazType, data) ptr
20 21
21foo ptr = do 22
22 qtr <- getContPtr ptr 23
23 getData qtr
24 24