From e8ee99ff1ae054c4edefb60083b11db5fe1c7429 Mon Sep 17 00:00:00 2001 From: yugui Date: Sat, 4 Oct 2008 13:57:06 +0000 Subject: * dln.c: Ruby no longer supports VMS. * error.c: ditto. * eval.c: ditto. * eval_intern.h: ditto. * include/ruby/defines.h: ditto. * include/ruby/ruby.h: ditto. * io.c: ditto. * process.c: ditto. * ruby.c: ditto. * vms/config.h: removed. * vms/vms.h: ditto. * vms/vmsruby_private.c: ditto. * vms/vmsruby_private.h: ditto. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@19682 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- vms/config.h | 123 -------------------------------------------------- vms/vms.h | 13 ------ vms/vmsruby_private.c | 52 --------------------- vms/vmsruby_private.h | 7 --- 4 files changed, 195 deletions(-) delete mode 100644 vms/config.h delete mode 100644 vms/vms.h delete mode 100644 vms/vmsruby_private.c delete mode 100644 vms/vmsruby_private.h (limited to 'vms') diff --git a/vms/config.h b/vms/config.h deleted file mode 100644 index 55b0c36803..0000000000 --- a/vms/config.h +++ /dev/null @@ -1,123 +0,0 @@ -#define HAVE_ACOSH 1 -/* #define HAVE_ALLOCA_H 1 */ -/* #define HAVE_CHROOT 1 */ -#define HAVE_COSH 1 -/* #define HAVE_CRYPT 1 */ -#define HAVE_DAYLIGHT 1 -#define HAVE_DECL_SYS_NERR 1 -#define HAVE_DIRENT_H 1 -#define HAVE_DLOPEN 1 -#define HAVE_DUP2 1 -/* #define HAVE_FCHMOD 1 */ -#define HAVE_FCNTL 1 -#define HAVE_FCNTL_H 1 -#define HAVE_FINITE 1 -#define HAVE_FLOCK 1 -#define HAVE_FMOD 1 -#define HAVE_FREXP 1 -/* #define HAVE_FSEEKO 1 */ -#define HAVE_FSYNC 1 -/* #define HAVE_FTELLO 1 */ -#define HAVE_GETCWD 1 -/* #define HAVE_GETPGID 1 xxxx */ -#define HAVE_GETPGRP 1 -/* #define HAVE_GETPRIORITY 1 */ -/* #define HAVE_GETRLIMIT 1 */ -#define HAVE_PID_T 1 -#define HAVE_GID_T 1 -#define HAVE_UID_T 1 -#define HAVE_HYPOT 1 -#define HAVE_ISASCII 1 -/* #define HAVE_ISINF 1 */ -#define HAVE_ISNAN 1 -/* #define HAVE_LCHMOD 1 */ -/* #define HAVE_LCHOWN 1 */ -#define HAVE_LONG_LONG 1 -/* #define HAVE_LSTAT 1 */ -#define HAVE_MEMCMP 1 -#define HAVE_MEMMOVE 1 -#define HAVE_MKDIR 1 -#define HAVE_MKTIME 1 -#define HAVE_MODF 1 -#define HAVE_OFF_T 1 -#define HAVE_PAUSE 1 -/* #define HAVE_PROTOTYPES 1 */ -/* #define HAVE_PWD_H 1 */ -/* #define HAVE_READLINK 1 */ -#define HAVE_SEEKDIR 1 -/* #define HAVE_SETITIMER 1 */ -/* #define HAVE_SETPGID 1 xxxx */ -/* #define HAVE_SETRESGID 1 */ -/* #define HAVE_SETRESUID 1 */ -/* #define HAVE_SETSID 1 xxxx */ -#define HAVE_SIGPROCMASK 1 -#define HAVE_SINH 1 -#define HAVE_STDARG_PROTOTYPES 1 -#define HAVE_STDLIB_H 1 -#define HAVE_STRCASECMP 1 -#define HAVE_STRCHR 1 -#define HAVE_STRERROR 1 -#define HAVE_STRFTIME 1 -#define HAVE_STRING_H 1 -#define HAVE_STRNCASECMP 1 -#define HAVE_STRSTR 1 -#define HAVE_STRTOD 1 -#define HAVE_STRTOL 1 -#define HAVE_STRTOUL 1 -#define HAVE_STRUCT_TM_TM_GMTOFF 1 -/* #define HAVE_ST_BLKSIZE 1 */ -/* #define HAVE_ST_BLOCKS 1 */ -#define HAVE_ST_RDEV 1 -/* #define HAVE_SYMLINK 1 */ -/* #define HAVE_SYSCALL 1 */ -#define HAVE_SYS_FILE_H 1 -/* #define HAVE_SYS_MKDEV_H 1 */ -/* #define HAVE_SYS_PARAM_H 1 */ -#define HAVE_SYS_RESOURCE_H 1 -/* #define HAVE_SYS_SELECT_H 1 */ -#define HAVE_SYS_TIMES_H 1 -#define HAVE_SYS_TIME_H 1 -#define HAVE_SYS_WAIT_H 1 -#define HAVE_TANH 1 -#define HAVE_TELLDIR 1 -/* #define HAVE_TIMEGM 1 */ -#define HAVE_TIMES 1 -#define HAVE_TM_ZONE 1 -#define HAVE_TRUNCATE 1 -#define HAVE_TZNAME 1 -#define HAVE_UNISTD_H 1 -#define HAVE_UTIMES 1 -#define HAVE_UTIME_H 1 -/* #define HAVE_VSNPRINTF 1 */ -#define HAVE_WAIT4 1 -#define HAVE_WAITPID 1 - #define HAVE__SETJMP 1 - -#define GETGROUPS_T gid_t -#define RETSIGTYPE void - -#define RSHIFT(x,y) ((x)>>y) -#define DEFAULT_KCODE KCODE_EUC -#define DLEXT ".EXE" -#define DLEXT2 "" -#define RUBY_LIB "/RUBY_LIB" -#define RUBY_SITE_LIB "/RUBY_SYSLIB" -#define RUBY_SITE_LIB2 "/SYS$SHARE" -#define RUBY_ARCHLIB "" -#define RUBY_SITE_ARCHLIB "" -#define SIZEOF_INT 4 -#define SIZEOF_SHORT 2 -#define SIZEOF_LONG 4 -#define SIZEOF_VOIDP 4 -#define SIZEOF_FLOAT 4 -#define SIZEOF_DOUBLE 8 - -#if defined(__vax) -#define RUBY_PLATFORM "vax-vms" -#elif defined(__alpha) -#define RUBY_PLATFORM "alpha-vms" -#elif defined(__ia-64) -#define RUBY_PLATFORM "ia64-vms" -#else -#define RUBY_PLATFORM "vms" -#endif diff --git a/vms/vms.h b/vms/vms.h deleted file mode 100644 index 8eaa88cde3..0000000000 --- a/vms/vms.h +++ /dev/null @@ -1,13 +0,0 @@ -#ifndef __FAST_SETJMP -#define __FAST_SETJMP /* use decc$setjmp/decc$longjmp */ -#endif - -extern int isinf(double); -extern int isnan(double); -extern int flock(int fd, int oper); - -extern int vsnprintf(); -extern int snprintf(); - -#define LONG_LONG long long -#define SIZEOF_LONG_LONG sizeof(long long) diff --git a/vms/vmsruby_private.c b/vms/vmsruby_private.c deleted file mode 100644 index c1cbfcebec..0000000000 --- a/vms/vmsruby_private.c +++ /dev/null @@ -1,52 +0,0 @@ -#include "vmsruby_private.h" -#include -#include - -void _vmsruby_init(void) -{ - _vmsruby_set_switch("DECC$WLS", "TRUE"); -} - - -#include -#include -#include -#include - -struct item_list_3 { - short buflen; - short itmcod; - void *bufadr; - void *retlen; -}; - -long _vmsruby_set_switch(char *name, char *value) -{ - long status; - struct item_list_3 itemlist[20]; - int i; - - i = 0; - itemlist[i].itmcod = LNM$_STRING; - itemlist[i].buflen = strlen(value); - itemlist[i].bufadr = value; - itemlist[i].retlen = NULL; - i++; - itemlist[i].itmcod = 0; - itemlist[i].buflen = 0; - - $DESCRIPTOR(TABLE_d, "LNM$PROCESS"); - $DESCRIPTOR(lognam_d, ""); - - lognam_d.dsc$a_pointer = name; - lognam_d.dsc$w_length = strlen(name); - - status = sys$crelnm ( - 0, - &TABLE_d, - &lognam_d, - 0, /* usermode */ - itemlist); - - return status; -} diff --git a/vms/vmsruby_private.h b/vms/vmsruby_private.h deleted file mode 100644 index 24703dc7fc..0000000000 --- a/vms/vmsruby_private.h +++ /dev/null @@ -1,7 +0,0 @@ -#ifndef VMSRUBY_H_INCLUDED -#define VMSRUBY_H_INCLUDED - -void _vmsruby_init(void); -long _vmsruby_set_switch(char *, char *); - -#endif /* VMSRUBY_H_INCLUDED */ -- cgit v1.2.3