Add private initialization routine for VMS.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@7587 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 6 insertions, 0 deletions

diff --git a/eval.c b/eval.c
index 5296d35ff4..596cb8091e 100644
--- a/eval.c
+++ b/eval.c
@@ -88,6 +88,10 @@ char *strrchr _((const char*,const char));
 #include "macruby_private.h"
 #endif
 
+#ifdef __VMS
+#include "vmsruby_private.h"
+#endif
+
 #ifdef USE_CONTEXT
 typedef struct {
     ucontext_t context;
@@ -1259,6 +1263,8 @@ ruby_init()
 	rb_define_global_const("TOPLEVEL_BINDING", rb_f_binding(ruby_top_self));
 #ifdef __MACOS__
 	_macruby_init();
+#elif defined(__VMS)
+    _vmsruby_init();
 #endif
 	ruby_prog_init();
 	ALLOW_INTS;