Changeset 3893 for src/Pugs/Embed/Perl5.hs

Timestamp:

05/26/05 02:54:31 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

5482

Message:

* fix nonembed build

Files:

• src/Pugs/Embed/Perl5.hs (modified) (2 diffs)

src/Pugs/Embed/Perl5.hs

@@ -3 +3 @@
 #ifndef PUGS_HAVE_PERL5
 module Pugs.Embed.Perl5 where
+import Foreign.C.Types
 
 type PerlInterpreter = ()
@@ -28 +29 @@
 vintToSV = constFail
 
-callPerl5 :: String -> [PerlSV] -> IO PerlSV
+callPerl5 :: String -> [PerlSV] -> CInt -> IO PerlSV
 callPerl5 _ = constFail