summaryrefslogtreecommitdiff
path: root/vms/vmsish.h
diff options
context:
space:
mode:
authorPerl 5 Porters <perl5-porters@africa.nicoh.com>1996-09-07 03:16:19 +0000
committerAndy Dougherty <doughera@lafcol.lafayette.edu>1996-09-07 03:16:19 +0000
commit94c456c4e40124cc461aec37335ca9c4f550ff6b (patch)
tree013a23900a74dcbc2d0616c6911763dfed429725 /vms/vmsish.h
parenta17cb150d9402fae73682fb5b1eaab2f66474f69 (diff)
downloadperl-94c456c4e40124cc461aec37335ca9c4f550ff6b.tar.gz
VMS 5.003_05 Update.
Diffstat (limited to 'vms/vmsish.h')
-rw-r--r--vms/vmsish.h8
1 files changed, 6 insertions, 2 deletions
diff --git a/vms/vmsish.h b/vms/vmsish.h
index 36bfaff580..a362374e1c 100644
--- a/vms/vmsish.h
+++ b/vms/vmsish.h
@@ -56,6 +56,8 @@
#ifdef EMBED
# define my_trnlnm Perl_my_trnlnm
# define my_getenv Perl_my_getenv
+# define prime_env_iter Perl_prime_env_iter
+# define my_setenv Perl_my_setenv
# define my_crypt Perl_my_crypt
# define waitpid Perl_waitpid
# define my_gconvert Perl_my_gconvert
@@ -397,6 +399,10 @@ typedef unsigned myino_t;
* __VMS_PROTOTYPES__ and __VMS_SEPYTOTORP__ lines, and must be in the form
* <data type><TAB>name<WHITESPACE>_((<prototype args>));
*/
+
+void prime_env_iter _((void));
+void getredirection _((int *, char ***));
+void init_os_extras _(());
/* prototype section start marker; `typedef' passes through cpp */
typedef char __VMS_PROTOTYPES__;
int my_trnlnm _((char *, char *, unsigned long int));
@@ -426,7 +432,6 @@ long telldir _((DIR *));
void seekdir _((DIR *, long));
void closedir _((DIR *));
void vmsreaddirversions _((DIR *, int));
-void getredirection _((int *, char ***));
struct tm *my_gmtime _((const time_t *));
I32 cando_by_name _((I32, I32, char *));
int flex_fstat _((int, struct stat *));
@@ -445,7 +450,6 @@ struct passwd * my_getpwent _(());
void my_endpwent _(());
char * my_getlogin _(());
int rmscopy _((char *, char *, int));
-void init_os_extras _(());
typedef char __VMS_SEPYTOTORP__;
/* prototype section end marker; `typedef' passes through cpp */