summaryrefslogtreecommitdiff
path: root/embed.pl
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-12-23 01:47:23 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-12-23 01:47:23 +0000
commitd4f0d9286be4daccd582c7bf38e50c3d474f3760 (patch)
tree84f818d7ddb86b9834c80b476851eba7aff90295 /embed.pl
parenteb08e2da3ae8f4fa2493d690c28ed87301ed6ed9 (diff)
parent3da9a137807e4f1acaf9cb3024a6cc5fbd119b9f (diff)
downloadperl-d4f0d9286be4daccd582c7bf38e50c3d474f3760.tar.gz
Integrate perlio:
[ 13854] Win32 and makedef.pl fall-out of PerlIO/pTHX stuff [ 13853] Put PerlIO stuff inside EXTERN C [ 13852] Add at least the "important" PerlIO_xxxx functions to embed.pl so that they get implicit pTHX_ and we can avoid slow dTHX. p4raw-link: @13854 on //depot/perlio: 3da9a137807e4f1acaf9cb3024a6cc5fbd119b9f p4raw-link: @13853 on //depot/perlio: 582ed04c91818c6c9bf5b51c84f67b7c565925a7 p4raw-link: @13852 on //depot/perlio: e87a358ade5a3dd9a8b192569e18211d76c93743 p4raw-id: //depot/perl@13862
Diffstat (limited to 'embed.pl')
-rwxr-xr-xembed.pl28
1 files changed, 28 insertions, 0 deletions
diff --git a/embed.pl b/embed.pl
index b881828d11..bfd8211a1a 100755
--- a/embed.pl
+++ b/embed.pl
@@ -2357,5 +2357,33 @@ Ap |char* |my_atof2 |const char *s|NV* value
Ap |int |my_socketpair |int family|int type|int protocol|int fd[2]
#endif
+
+#if defined(USE_PERLIO) && !defined(USE_SFIO)
+Ap |int |PerlIO_close |PerlIO *
+Ap |int |PerlIO_fill |PerlIO *
+Ap |int |PerlIO_fileno |PerlIO *
+Ap |int |PerlIO_eof |PerlIO *
+Ap |int |PerlIO_error |PerlIO *
+Ap |int |PerlIO_flush |PerlIO *
+Ap |void |PerlIO_clearerr |PerlIO *
+Ap |void |PerlIO_set_cnt |PerlIO *|int
+Ap |void |PerlIO_set_ptrcnt |PerlIO *|STDCHAR *|int
+Ap |void |PerlIO_setlinebuf |PerlIO *
+Ap |SSize_t|PerlIO_read |PerlIO *|void *|Size_t
+Ap |SSize_t|PerlIO_write |PerlIO *|const void *|Size_t
+Ap |SSize_t|PerlIO_unread |PerlIO *|const void *|Size_t
+Ap |Off_t |PerlIO_tell |PerlIO *
+Ap |int |PerlIO_seek |PerlIO *|Off_t|int
+
+Ap |STDCHAR *|PerlIO_get_base |PerlIO *
+Ap |STDCHAR *|PerlIO_get_ptr |PerlIO *
+Ap |int |PerlIO_get_bufsiz |PerlIO *
+Ap |int |PerlIO_get_cnt |PerlIO *
+
+Ap |PerlIO *|PerlIO_stdin
+Ap |PerlIO *|PerlIO_stdout
+Ap |PerlIO *|PerlIO_stderr
+#endif /* PERLIO_LAYERS */
+
END_EXTERN_C