2000-08-03 13:50:41 +04:00
|
|
|
#! ./miniruby
|
1999-01-20 07:59:39 +03:00
|
|
|
|
2000-08-03 13:50:41 +04:00
|
|
|
load './rbconfig.rb'
|
1998-01-16 15:19:09 +03:00
|
|
|
include Config
|
|
|
|
|
2000-06-14 12:08:50 +04:00
|
|
|
unless File.exist? "./#{CONFIG['ruby_install_name']}#{CONFIG['EXEEXT']}"
|
2000-06-12 11:48:31 +04:00
|
|
|
print "./#{CONFIG['ruby_install_name']} is not found.\n"
|
|
|
|
print "Try `make' first, then `make test', please.\n"
|
2001-05-06 19:06:00 +04:00
|
|
|
exit 1
|
2000-06-12 11:48:31 +04:00
|
|
|
end
|
|
|
|
|
1999-08-13 09:45:20 +04:00
|
|
|
if File.exist? CONFIG['LIBRUBY_SO']
|
|
|
|
case RUBY_PLATFORM
|
|
|
|
when /-hpux/
|
|
|
|
dldpath = "SHLIB_PATH"
|
|
|
|
when /-aix/
|
|
|
|
dldpath = "LIBPATH"
|
1999-10-13 10:44:42 +04:00
|
|
|
when /-beos/
|
|
|
|
dldpath = "LIBRARY_PATH"
|
1999-08-13 09:45:20 +04:00
|
|
|
else
|
|
|
|
dldpath = "LD_LIBRARY_PATH"
|
|
|
|
end
|
|
|
|
x = ENV[dldpath]
|
|
|
|
x = x ? ".:"+x : "."
|
|
|
|
ENV[dldpath] = x
|
|
|
|
end
|
|
|
|
|
|
|
|
if /linux/ =~ RUBY_PLATFORM and File.exist? CONFIG['LIBRUBY_SO']
|
|
|
|
ENV["LD_PRELOAD"] = "./#{CONFIG['LIBRUBY_SO']}"
|
|
|
|
end
|
|
|
|
|
1998-01-16 15:19:09 +03:00
|
|
|
$stderr.reopen($stdout)
|
|
|
|
error = ''
|
2000-06-12 11:48:31 +04:00
|
|
|
|
2000-08-03 13:50:41 +04:00
|
|
|
`./#{CONFIG["ruby_install_name"]}#{CONFIG["EXEEXT"]} #{CONFIG["srcdir"]}/sample/test.rb`.each do |line|
|
1998-01-16 15:19:09 +03:00
|
|
|
if line =~ /^end of test/
|
|
|
|
print "test succeeded\n"
|
|
|
|
exit 0
|
|
|
|
end
|
|
|
|
error << line if line =~ %r:^(sample/test.rb|not):
|
|
|
|
end
|
|
|
|
print error
|
|
|
|
print "test failed\n"
|
1999-08-24 12:21:56 +04:00
|
|
|
exit 1
|