Changeset 3920 for src/perl5

Timestamp:

05/26/05 23:35:17 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

5482

Message:

* pugsembed callback #1 -- pugs_MkSvRef -- finished

Location:

src/perl5

Files:

• pugsembed.c (modified) (1 diff)
• pugsembed.h (modified) (2 diffs)

src/perl5/pugsembed.c

@@ -29 +29 @@
 Val *pugs_PvToVal ( char *pv ) { return NULL; }
 
-Val *pugs_MkSvRef  ( SV *sv ) { return NULL; }
-
 SV  *pugs_ValToSv ( Val *val ) { return NULL; }

src/perl5/pugsembed.h

@@ -16 +16 @@
 PUGS_EXTERN Val *pugs_PvToVal ( char *pv );
 
-PUGS_EXTERN Val *pugs_MkSvRef  ( SV *sv );
 PUGS_EXTERN SV  *pugs_ValToSv ( Val *val );
 
@@ -22 +21 @@
 SV  *pugs_MkValRef ( Val *val );
 
+extern Val *pugs_MkSvRef  ( SV *sv );