2008-04-07 14:39:28 -04:00
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def self.ok;:ok;end;end"}
|
|
|
|
autoload :ZZZ, "./zzz.rb"
|
2008-04-07 19:33:01 -04:00
|
|
|
ZZZ.ok
|
2008-04-07 14:39:28 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def self.ok;:ok;end;end"}
|
|
|
|
autoload :ZZZ, "./zzz.rb"
|
|
|
|
require "./zzz.rb"
|
2008-04-07 19:33:01 -04:00
|
|
|
ZZZ.ok
|
2008-04-07 14:39:28 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def self.ok;:ok;end;end"}
|
|
|
|
autoload :ZZZ, "./zzz.rb"
|
2008-04-07 19:33:01 -04:00
|
|
|
proc{$SAFE=4; ZZZ.ok}.call
|
2008-04-07 14:39:28 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def self.ok;:ok;end;end"}
|
|
|
|
autoload :ZZZ, "./zzz.rb"
|
|
|
|
require "./zzz.rb"
|
2008-04-07 19:33:01 -04:00
|
|
|
proc{$SAFE=4; ZZZ.ok}.call
|
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def hoge;:ok;end;end"}
|
|
|
|
autoload :ZZZ, File.join(Dir.pwd, 'zzz.rb')
|
|
|
|
module M; end
|
|
|
|
Thread.new{M.instance_eval('$SAFE=4; ZZZ.new.hoge')}.value
|
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def hoge;:ok;end;end"}
|
|
|
|
autoload :ZZZ, File.join(Dir.pwd, 'zzz.rb')
|
|
|
|
module M; end
|
|
|
|
Thread.new{$SAFE=4; M.instance_eval('ZZZ.new.hoge')}.value
|
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def hoge;:ok;end;end"}
|
|
|
|
autoload :ZZZ, File.join(Dir.pwd, 'zzz.rb')
|
|
|
|
Thread.new{$SAFE=4; eval('ZZZ.new.hoge')}.value
|
|
|
|
}
|
|
|
|
|
|
|
|
assert_equal 'ok', %q{
|
|
|
|
open("zzz.rb", "w") {|f| f.puts "class ZZZ; def hoge;:ok;end;end"}
|
|
|
|
autoload :ZZZ, File.join(Dir.pwd, 'zzz.rb')
|
|
|
|
module M; end
|
|
|
|
Thread.new{eval('$SAFE=4; ZZZ.new.hoge')}.value
|
2008-04-07 14:39:28 -04:00
|
|
|
}
|