Changeset 3952 for src/Pugs/Embed/Perl5.hs
- Timestamp:
- 05/27/05 04:13:36 (4 years ago)
- svk:copy_cache_prev:
- 5515
- Files:
-
- 1 modified
-
src/Pugs/Embed/Perl5.hs (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Embed/Perl5.hs
r3951 r3952 7 7 type PerlInterpreter = () 8 8 type PerlSV = () 9 type PugsVa r= ()9 type PugsVal = () 10 10 11 11 constFail :: a -> IO b … … 102 102 foreign import ccall "perl5.h perl5_get_sv" 103 103 perl5_get_sv :: CString -> IO PerlSV 104 foreign import ccall "perl5.h perl5_set_svref"105 perl5_set_svref :: CString -> PugsVal -> IO ()106 104 foreign import ccall "perl5.h perl5_apply" 107 105 perl5_apply :: PerlSV -> PerlSV -> Ptr PerlSV -> PugsVal -> CInt -> IO PerlSV
