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