2000-08-03 13:50:41 +04:00
|
|
|
#! ./miniruby
|
1999-01-20 07:59:39 +03:00
|
|
|
|
2004-04-15 14:57:16 +04:00
|
|
|
exit if defined?(CROSS_COMPILING)
|
2000-08-03 13:50:41 +04:00
|
|
|
load './rbconfig.rb'
|
1998-01-16 15:19:09 +03:00
|
|
|
include Config
|
|
|
|
|
2004-04-15 14:57:16 +04:00
|
|
|
ruby = "./#{CONFIG['ruby_install_name']}#{CONFIG['EXEEXT']}"
|
|
|
|
unless File.exist? ruby
|
|
|
|
print "#{ruby} is not found.\n"
|
2000-06-12 11:48:31 +04:00
|
|
|
print "Try `make' first, then `make test', please.\n"
|
2004-04-15 14:57:16 +04:00
|
|
|
exit false
|
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"
|
2003-08-01 18:35:51 +04:00
|
|
|
when /-darwin/
|
|
|
|
dldpath = "DYLD_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
|
|
|
|
2004-03-18 13:49:20 +03:00
|
|
|
srcdir = File.dirname(__FILE__)
|
2004-04-15 14:57:16 +04:00
|
|
|
`#{ruby} -I#{srcdir}/lib #{srcdir}/sample/test.rb`.each do |line|
|
1998-01-16 15:19:09 +03:00
|
|
|
if line =~ /^end of test/
|
|
|
|
print "test succeeded\n"
|
2004-04-15 14:57:16 +04:00
|
|
|
exit true
|
1998-01-16 15:19:09 +03:00
|
|
|
end
|
|
|
|
error << line if line =~ %r:^(sample/test.rb|not):
|
|
|
|
end
|
|
|
|
print error
|
|
|
|
print "test failed\n"
|
2004-04-15 14:57:16 +04:00
|
|
|
exit false
|