From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 30 Jun 2000 02:21:44 +0000 (+0000)
Subject: Integrate with Sarathy.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ab3b2ded41425f3588741db207891897ba0816e3;p=p5sagit%2Fp5-mst-13.2.git

Integrate with Sarathy.

p4raw-id: //depot/cfgperl@6290
---

ab3b2ded41425f3588741db207891897ba0816e3
diff --cc vms/vmsish.h
index 48eda0a,382e314..104eabc
--- a/vms/vmsish.h
+++ b/vms/vmsish.h
@@@ -145,8 -109,25 +145,9 @@@
  #define kill_file		Perl_kill_file
  #define my_mkdir		Perl_my_mkdir
  #define my_chdir		Perl_my_chdir
+ #define my_tmpfile		Perl_my_tmpfile
  #define my_utime		Perl_my_utime
 -#define rmsexpand	Perl_rmsexpand
 -#define rmsexpand_ts	Perl_rmsexpand_ts
 -#define fileify_dirspec	Perl_fileify_dirspec
 -#define fileify_dirspec_ts	Perl_fileify_dirspec_ts
 -#define pathify_dirspec	Perl_pathify_dirspec
 -#define pathify_dirspec_ts	Perl_pathify_dirspec_ts
 -#define tounixspec		Perl_tounixspec
 -#define tounixspec_ts		Perl_tounixspec_ts
 -#define tovmsspec		Perl_tovmsspec
 -#define tovmsspec_ts		Perl_tovmsspec_ts
 -#define tounixpath		Perl_tounixpath
 -#define tounixpath_ts		Perl_tounixpath_ts
 -#define tovmspath		Perl_tovmspath
 -#define tovmspath_ts		Perl_tovmspath_ts
  #define vms_image_init	Perl_vms_image_init
 -#define opendir		Perl_opendir
  #define readdir		Perl_readdir
  #define telldir		Perl_telldir
  #define seekdir		Perl_seekdir
@@@ -698,8 -653,25 +709,9 @@@ char *	my_gconvert (double, int, int, c
  int	kill_file (char *);
  int	my_mkdir (char *, Mode_t);
  int	my_chdir (char *);
+ FILE *	my_tmpfile (void);
  int	my_utime (char *, struct utimbuf *);
 -char *	rmsexpand (char *, char *, char *, unsigned);
 -char *	rmsexpand_ts (char *, char *, char *, unsigned);
 -char *	fileify_dirspec (char *, char *);
 -char *	fileify_dirspec_ts (char *, char *);
 -char *	pathify_dirspec (char *, char *);
 -char *	pathify_dirspec_ts (char *, char *);
 -char *	tounixspec (char *, char *);
 -char *	tounixspec_ts (char *, char *);
 -char *	tovmsspec (char *, char *);
 -char *	tovmsspec_ts (char *, char *);
 -char *	tounixpath (char *, char *);
 -char *	tounixpath_ts (char *, char *);
 -char *	tovmspath (char *, char *);
 -char *	tovmspath_ts (char *, char *);
  void	vms_image_init (int *, char ***);
 -DIR *	opendir (char *);
  struct dirent *	readdir (DIR *);
  long	telldir (DIR *);
  void	seekdir (DIR *, long);