January 2009 - macruby-changes - lists.macosforge.org

[779] MacRuby/trunk
by source_changes＠macosforge.org 07 Jan '09

07 Jan '09

Revision: 779 http://trac.macosforge.org/projects/ruby/changeset/779 Author: eloy.de.enige(a)gmail.com Date: 2009-01-07 05:49:40 -0800 (Wed, 07 Jan 2009) Log Message: ----------- Added first part of Objective-C extensions from RubyCocoa's oc_attachments. Not yet required by default. Added Paths: ----------- MacRuby/trunk/lib/objc_ext/ MacRuby/trunk/lib/objc_ext/ns_user_defaults.rb MacRuby/trunk/test-macruby/test_objc_ext.rb Added: MacRuby/trunk/lib/objc_ext/ns_user_defaults.rb =================================================================== --- MacRuby/trunk/lib/objc_ext/ns_user_defaults.rb (rev 0) +++ MacRuby/trunk/lib/objc_ext/ns_user_defaults.rb 2009-01-07 13:49:40 UTC (rev 779) @@ -0,0 +1,19 @@ +module MacRuby + module ObjcExt + module NSUserDefaults + def [](key) + valueForKey(key) + end + + def []=(key, value) + setValue(value, forKey: key) + end + + def delete(key) + removeObjectForKey(key) + end + end + end +end + +NSUserDefaults.send(:include, MacRuby::ObjcExt::NSUserDefaults) \ No newline at end of file Added: MacRuby/trunk/test-macruby/test_objc_ext.rb =================================================================== --- MacRuby/trunk/test-macruby/test_objc_ext.rb (rev 0) +++ MacRuby/trunk/test-macruby/test_objc_ext.rb 2009-01-07 13:49:40 UTC (rev 779) @@ -0,0 +1,39 @@ +#!/usr/bin/env macruby + +require 'test/unit' +class Test::Unit::TestCase + class << self + def it(name, &block) + define_method("test_#{name}", &block) + end + end +end + +$: << File.expand_path('../../lib', __FILE__) +require 'objc_ext/ns_user_defaults' + +# These tests should probably move to the macruby part of rubyspec once we get to that point. + +class TestNSUserDefaults < Test::Unit::TestCase + it "returns a value for a given key through the #[] reader method" do + defaults.setValue('foo', forKey: 'key') + assert_equal 'foo', defaults['key'] + end + + it "assigns a value for a given key through the #[]= writer method" do + defaults['key'] = 'foo' + assert_equal 'foo', defaults.valueForKey('key') + end + + it "removes an object for a given key with the #delete method" do + defaults.setValue('foo', forKey: 'key') + defaults.delete('key') + assert_nil defaults.valueForKey('key') + end + + private + + def defaults + NSUserDefaults.standardUserDefaults + end +end \ No newline at end of file

1 0

[778] MacRuby/trunk/test-macruby/known_bugs.rb
by source_changes＠macosforge.org 06 Jan '09

06 Jan '09

Revision: 778 http://trac.macosforge.org/projects/ruby/changeset/778 Author: eloy.de.enige(a)gmail.com Date: 2009-01-06 07:54:53 -0800 (Tue, 06 Jan 2009) Log Message: ----------- Added failing test case about calling super from respond_to? to known_bugs.rb Modified Paths: -------------- MacRuby/trunk/test-macruby/known_bugs.rb Modified: MacRuby/trunk/test-macruby/known_bugs.rb =================================================================== --- MacRuby/trunk/test-macruby/known_bugs.rb 2009-01-06 14:59:53 UTC (rev 777) +++ MacRuby/trunk/test-macruby/known_bugs.rb 2009-01-06 15:54:53 UTC (rev 778) @@ -106,4 +106,18 @@ assert_raise(NameError) { NamespacedClass } end end + + class TestRespondTo < Test::Unit::TestCase + class RespondTo + def respond_to?(method, hidden = false) + super + end + end + + def test_super_implementation + assert_nothing_raised(SystemStackError) do + RespondTo.new.respond_to?(:object_id) + end + end + end end \ No newline at end of file

1 0

[777] MacRuby/trunk/test-macruby/known_bugs.rb
by source_changes＠macosforge.org 06 Jan '09

06 Jan '09

Revision: 777 http://trac.macosforge.org/projects/ruby/changeset/777 Author: eloy.de.enige(a)gmail.com Date: 2009-01-06 06:59:53 -0800 (Tue, 06 Jan 2009) Log Message: ----------- Added failing test case about constant lookup to known bugs. Modified Paths: -------------- MacRuby/trunk/test-macruby/known_bugs.rb Modified: MacRuby/trunk/test-macruby/known_bugs.rb =================================================================== --- MacRuby/trunk/test-macruby/known_bugs.rb 2008-12-30 16:32:10 UTC (rev 776) +++ MacRuby/trunk/test-macruby/known_bugs.rb 2009-01-06 14:59:53 UTC (rev 777) @@ -91,4 +91,19 @@ assert Module.new.respond_to?(:a_module_instance_method) end end + + class TestConstantLookup < Test::Unit::TestCase + module Namespace + NamespacedConstant = nil + class NamespacedClass; end + end + + def test_should_not_find_namespaced_constants # works + assert_raise(NameError) { NamespacedConstant } + end + + def test_should_not_find_namespaced_classes # fails + assert_raise(NameError) { NamespacedClass } + end + end end \ No newline at end of file

1 0