+#define my_time Perl_my_time
+#define do_spawn Perl_do_spawn
+#define flex_fstat Perl_flex_fstat
+#define flex_stat Perl_flex_stat
+#define flex_lstat Perl_flex_lstat
+#define cando_by_name Perl_cando_by_name
+#define my_getpwnam Perl_my_getpwnam
+#define my_getpwuid Perl_my_getpwuid
+#define my_flush Perl_my_flush
+#define readdir Perl_readdir
+#define readdir_r Perl_readdir_r
+#else
+#define my_getenv_len(a,b,c) Perl_my_getenv_len(aTHX_ a,b,c)
+#define vmssetenv(a,b,c) Perl_vmssetenv(aTHX_ a,b,c)
+#define my_trnlnm(a,b,c) Perl_my_trnlnm(aTHX_ a,b,c)
+#define my_setenv(a,b) Perl_my_setenv(aTHX_ a,b)
+#define my_getenv(a,b) Perl_my_getenv(aTHX_ a,b)
+#define tounixspec(a,b) Perl_tounixspec(aTHX_ a,b)
+#define tounixspec_ts(a,b) Perl_tounixspec_ts(aTHX_ a,b)
+#define tovmsspec(a,b) Perl_tovmsspec(aTHX_ a,b)
+#define tovmsspec_t(a,b) Perl_tovmsspec_ts(aTHX_ a,b)
+#define tounixpath(a,b) Perl_tounixpath(aTHX_ a,b)
+#define tounixpath_ts(a,b) Perl_tounixpath_ts(aTHX_ a,b)
+#define tovmspath(a,b) Perl_tovmspath(aTHX_ a,b)
+#define tovmspath_ts(a,b) Perl_tovmspath_ts(aTHX_ a,b)
+#define do_rmdir(a) Perl_do_rmdir(aTHX_ a)
+#define fileify_dirspec(a,b) Perl_fileify_dirspec(aTHX_ a,b)
+#define fileify_dirspec_ts(a,b) Perl_fileify_dirspec_ts(aTHX_ a,b)
+#define pathify_dirspec Perl_pathify_dirspec
+#define pathify_dirspec_ts Perl_pathify_dirspec_ts
+#define rmsexpand(a,b,c,d) Perl_rmsexpand(aTHX_ a,b,c,d)
+#define rmsexpand_ts(a,b,c,d) Perl_rmsexpand_ts(aTHX_ a,b,c,d)
+#define trim_unixpath(a,b,c) Perl_trim_unixpath(aTHX_ a,b,c)
+#define opendir(a) Perl_opendir(aTHX_ a)
+#define rmscopy(a,b,c) Perl_rmscopy(aTHX_ a,b,c)
+#define my_mkdir(a,b) Perl_my_mkdir(aTHX_ a,b)
+#define vms_do_aexec(a,b,c) Perl_vms_do_aexec(aTHX_ a,b,c)
+#define vms_do_exec(a) Perl_vms_do_exec(aTHX_ a)
+#define my_waitpid(a,b,c) Perl_my_waitpid(aTHX_ a,b,c)
+#define my_crypt(a,b) Perl_my_crypt(aTHX_ a,b)
+#define kill_file(a) Perl_kill_file(aTHX_ a)
+#define my_utime(a,b) Perl_my_utime(aTHX_ a,b)
+#define my_chdir(a) Perl_my_chdir(aTHX_ a)
+#define do_aspawn(a,b,c) Perl_do_aspawn(aTHX_ a,b,c)
+#define seekdir(a,b) Perl_seekdir(aTHX_ a,b)
+#define my_gmtime(a) Perl_my_gmtime(aTHX_ a)
+#define my_localtime(a) Perl_my_localtime(aTHX_ a)
+#define my_time(a) Perl_my_time(aTHX_ a)
+#define do_spawn(a) Perl_do_spawn(aTHX_ a)
+#define flex_fstat(a,b) Perl_flex_fstat(aTHX_ a,b)
+#define cando_by_name(a,b,c) Perl_cando_by_name(aTHX_ a,b,c)
+#define flex_stat(a,b) Perl_flex_stat(aTHX_ a,b)
+#define my_getpwnam(a) Perl_my_getpwnam(aTHX_ a)
+#define my_getpwuid(a) Perl_my_getpwuid(aTHX_ a)
+#define my_flush(a) Perl_my_flush(aTHX_ a)
+#define readdir(a) Perl_readdir(aTHX_ a)
+#define readdir_r(a,b,c) Perl_readdir_r(aTHX_ a,b,c)
+#endif
+#define my_gconvert Perl_my_gconvert
+#define telldir Perl_telldir
+#define closedir Perl_closedir
+#define vmsreaddirversions Perl_vmsreaddirversions