qualitysmith_extensions 0.0.24 → 0.0.29

data/lib/qualitysmith_extensions/test/difference_highlighting.rb

@@ -12,10 +12,10 @@ gem 'colored'
 require 'colored'
 gem 'facets'
 require 'facets/core/module/alias_method_chain'
-gem 'qualitysmith_extensions', '>=0.0.22'
+gem 'qualitysmith_extensions', '>=0.0.28'
 require 'qualitysmith_extensions/object/send_if'
 require 'qualitysmith_extensions/string/each_char_with_index'
-require 'qualitysmith_extensions/module/mattr_tester'
+require 'qualitysmith_extensions/module/bool_attr_accessor'
 require 'qualitysmith_extensions/module/guard_method'
 require 'qualitysmith_extensions/colored/toggleability'
 
@@ -66,8 +66,7 @@ module Test
     module Assertions
       class AssertionMessage
         @@inspect_strings = false
-        #mattr_tester :inspect_strings
-        mguard_method :inspect_strings!, :@@inspect_strings, :disable_inspect_strings!
+        mguard_method :inspect_strings!, :@@inspect_strings
 
         # The problem with the original convert() is that it always called #inspect on strings... which is fine if you really
         # want to see all those \n's and such. But not so great if you want to visually compare the strings. And if you have
@@ -89,6 +88,15 @@ module Test
         end
         alias_method_chain :convert, :option_to_not_use_inspect_for_strings
       end
+    end
+  end
+end
+
+module Test
+  module Unit
+    module Assertions
+      @@use_assert_equal_with_highlight = nil
+      mguard_method :use_assert_equal_with_highlight!, :@@use_assert_equal_with_highlight
 
       # Rather than showing the expected and the actual and asking the user to painstakingly compare the two and figure out the
       # commonalities and differences himself, this method will highlight the differences for the user (in color), so that they
@@ -107,55 +115,75 @@ module Test
       # Difference in method signature from assert_equal_without_difference_highlighting:
       # * last argument is a hash (+options+) rather than message=nil, since I don't see the use in passing in a message if
       #   the default message can be made useful enough.
-      # * If you really want to pass in a message, use :message => 'my message'
+      # * If you really want to pass in a message, use <tt>:message => 'my message'</tt>
       #
-      # * If you want everything to be escaped (so you would see the color codes instead of the color itself), use :inspect_strings => true
+      # By default, highlighting is only used when one or both of the strings being compared is long/multiline. You can override the default with the <tt>:higlight</tt> option:
+      #   assert_equal 'really long string', 'another really long string', :highlight => true
+      # You can turn it on for all assert_equal assertions by calling
+      #   Test::Unit::Assertions::use_assert_equal_with_highlight!
+      # Or you can just turn it on or off for the duration of a block only:
+      #   Test::Unit::Assertions::use_assert_equal_with_highlight! do
+      #     assert_equal 'really long string', 'another really long string'
+      #   end
       #
-      # Spaces are displayed with an underline so that they are actually visible on the screen.
-      # * : 
-      def assert_equal_with_difference_highlighting(expected, actual, options = {})
+      # * Spaces are displayed with an underline so that they are actually visible on the screen.
+      # * Newlines are displayed as the text '\n' followed by an actual newline.
+      #
+      # Advanced:
+      # * If you want everything to be escaped (so you can see the color *codes* instead of the color itself, for example), use :inspect_strings => true
+      #
+      def assert_equal_with_highlighting(expected, actual, options = {})
         message = options.delete(:message) || nil
-        AssertionMessage.inspect_strings!(options.delete(:inspect_strings) || false)
-
-        if String===expected and String===actual and expected!=actual
-          expected_with_highlighting = ''
-          actual_with_highlighting = ''
-          full_message = nil
-          String.color_on! do
-            longest_string = [expected, actual].max {|a, b| a.length <=> b.length}
-            longest_string.each_char_with_index do |i, exp|
-              exp = expected[i] ? expected[i].chr : nil
-              act = actual[i]   ? actual[i].chr   : nil
-              if act.nil?
-                expected_with_highlighting << exp.highlight_unique
-                actual_with_highlighting   << ' '.highlight_absence
-              elsif exp.nil?
-                expected_with_highlighting << ' '.highlight_absence
-                actual_with_highlighting   << act.highlight_unique
-
-              elsif exp != act
-                expected_with_highlighting << exp.highlight_difference
-                actual_with_highlighting   << act.highlight_difference
-              else
-                expected_with_highlighting << exp.highlight_commonality
-                actual_with_highlighting   << exp.highlight_commonality
-              end
+        highlight = options.delete(:highlight)
+
+        Assertions.send_unless(highlight.nil?, :use_assert_equal_with_highlight!, highlight) do
+
+          if String===expected and String===actual and expected!=actual and 
+              (Assertions.use_assert_equal_with_highlight? || [expected.length, actual.length].max > 80 || [expected, actual].any? {|a| a.include?("\n")}) and
+              !(Assertions.use_assert_equal_with_highlight? == false)
+            expected_with_highlighting = ''
+            actual_with_highlighting = ''
+            full_message = nil
+            String.color_on! do
+              longest_string = [expected, actual].max {|a, b| a.length <=> b.length}
+              longest_string.each_char_with_index do |i, exp|
+                exp = expected[i] ? expected[i].chr : nil
+                act = actual[i]   ? actual[i].chr   : nil
+                if act.nil?
+                  expected_with_highlighting << exp.highlight_unique
+                  actual_with_highlighting   << ' '.highlight_absence
+                elsif exp.nil?
+                  expected_with_highlighting << ' '.highlight_absence
+                  actual_with_highlighting   << act.highlight_unique
+
+                elsif exp != act
+                  expected_with_highlighting << exp.highlight_difference
+                  actual_with_highlighting   << act.highlight_difference
+                else
+                  expected_with_highlighting << exp.highlight_commonality
+                  actual_with_highlighting   << exp.highlight_commonality
+                end
 
-            end
-            full_message = build_message(message, <<End, expected_with_highlighting, actual_with_highlighting)
+              end
+              full_message = build_message(message, <<End, expected_with_highlighting, actual_with_highlighting)
 #{(' '*50 + ' Expected: ' + ' '*50).blue.on_white }
 ?
 #{(' '*50 + ' But was:  ' + ' '*50).yellow.on_red }
 ?
 End
+            end
+              AssertionMessage.inspect_strings!(options.delete(:inspect_strings) || false) do
+                assert_block(full_message) { expected == actual }
+              end
+          else
+            assert_equal_without_highlighting(expected, actual, message)
           end
-          assert_block(full_message) { expected == actual }
-        else
-          assert_equal_without_difference_highlighting(expected, actual, message)
-        end
-      end # def assert_equal_with_difference_highlighting
-      #alias_method :assert_equal_with_highlighting, :assert_equal_with_difference_highlighting
-      alias_method_chain :assert_equal, :difference_highlighting
+
+        end # use_assert_equal_with_highlight!
+
+      end # def assert_equal_with_highlighting
+      alias_method :assert_equal_with_difference_highlighting, :assert_equal_with_highlighting
+      alias_method_chain :assert_equal, :highlighting
 
     end
   end
@@ -176,9 +204,13 @@ end
 #
 =begin test
 require 'test/unit'
+#Test::Unit::Assertions::use_assert_equal_with_highlight!
+
+# :todo: Currently these (intentionally failing) tests are just manual and require visual inspection. If possible it would be 
+# nice to capture the output of the failure and make an assertion against that. But I'm not sure how to do that...
 
 class TheTest < Test::Unit::TestCase
-  def test1_single_character_difference
+  def test01_single_character_difference
     assert_equal <<End, <<End
 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Sed feugiat mi. In sagittis, augue non eleifend sodales, arcu urna congue sapien, aliquet molestie pede urna sit amet dolor. Etiam diam. Vestibulum ornare, felis et porta faucibus, magna sapien vulputate arcu, vel facilisis lectus ipsum et ipsum.
 
@@ -190,22 +222,22 @@ Vivamus massa odio, lacinia eu, euismod vitae, lobortis eu, erat. Duis tincidunt
 End
   end
 
-  def test2_difference_in_control_characters
+  def test02_difference_in_control_characters
     assert_equal "Lorem ipsum dolor sit amet,\nconsectetuer adipiscing elit.\nSed feugiat mi.",
-                 "Lorem ipsum_dolor sit amet, consectetuer\tadipiscing elit.\n\rSed feugiat mi."
+                 "Lorem ipsum_dolor sit amet, consectetuer\tadipiscing elit.\n\rSed feugiat mi.", :highlight => true
   end
 
-  def test3_expected_is_longer
-    assert_equal '1234567890', '123'
+  def test03_expected_is_longer
+    assert_equal '1234567890', '123', :highlight => true
   end
 
-  def test4_actual_is_longer
-    assert_equal '123', '1234567890'
+  def test04_actual_is_longer
+    assert_equal '123', '1234567890', :highlight => true
   end
 
   # Use the ones above this line as screenshot material...
 
-  def test5_one_is_much_longer
+  def test05_one_is_much_longer
     assert_equal <<End, <<End
 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Sed feugiat mi. In sagittis, augue non eleifend sodales, arcu urna congue sapien, aliquet molestie pede urna sit amet dolor. Etiam diam. Vestibulum ornare, felis et porta faucibus, magna sapien vulputate arcu, vel facilisis lectus ipsum et ipsum. Sed dictum, dolor suscipit malesuada pharetra, orci augue lobortis lectus, porta porta magna magna ut dui. Duis viverra enim sed felis. Mauris semper volutpat pede. Integer lectus lorem, lacinia in, iaculis ut, euismod non, nulla. Nunc non libero eget diam congue ornare. Nunc dictum tellus sed turpis. Sed venenatis, pede non ultricies pharetra, dolor felis malesuada nisl, id imperdiet lorem dui vel velit.
 End
@@ -213,7 +245,7 @@ Lorem ipsum dolor sit amet
 End
   end
 
-  def test6_only_minor_single_character_differences_but_then_it_gets_out_of_sync
+  def test06_only_minor_single_character_differences_but_then_it_gets_out_of_sync
     assert_equal <<End, <<End
 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Sed feugiat mi. In sagittis, augue non eleifend sodales, arcu urna congue sapien.
 
@@ -224,7 +256,8 @@ Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Sed feugiat mi. In sag
 Vivamus massa odio, lacinia eu, euismod vitae, lobortis eu, erat. Duis tincidunt, neque ac tincidunt convallis, nibh tellus sodales eros, ut tristique nunc purus in urna. Nullam semper. Fusce quis augue ut metus interdum congue. Duis id dolor eu mi pellentesque sagittis. Quisque imperdiet orci a odio.
 End
   end
-  def test7_underscores_versus_underlines
+
+  def test07_underscores_versus_underlines
     assert_equal <<End, <<End
 If you look really closely, you'll see that underscores are a brighter color (bold), while spaces appear somewhaat faded, less visible:
 ___[Underscores]___[Underscores]   [Spaces] _ _ _ _ _ [Mix]
@@ -234,9 +267,22 @@ If you look really closely, you'll see that underscores are a brighter color (bo
 End
   end
 
-  def test12_expected_is_longer
+  def test08_inspect_strings_true
     assert_equal '1234567890', '123', :inspect_strings => true
   end
+  def test09_inspect_highlight_false
+    assert_equal '1234567890', '123', :highlight => false
+  end
+  def test10_highlight_false
+    Test::Unit::Assertions::use_assert_equal_with_highlight! false do
+      assert_equal 'really long string', 'another really long string'
+    end
+  end
+  def test11_highlight_true
+    Test::Unit::Assertions::use_assert_equal_with_highlight! do
+      assert_equal 'really long string', 'another really long string'
+    end
+  end
 
 end
 =end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.9.2
 specification_version: 1
 name: qualitysmith_extensions
 version: !ruby/object:Gem::Version 
-  version: 0.0.24
-date: 2007-04-27 00:00:00 -07:00
+  version: 0.0.29
+date: 2007-04-30 00:00:00 -07:00
 summary: A collection of reusable Ruby methods developed by QualitySmith.
 require_paths: 
 - lib
@@ -53,13 +53,6 @@ files:
 - lib/qualitysmith_extensions/kernel/backtrace.rb
 - lib/qualitysmith_extensions/kernel/capture_output.rb
 - lib/qualitysmith_extensions/kernel/trap_chain.rb
-- lib/qualitysmith_extensions/module.bak/guard_method.rb
-- lib/qualitysmith_extensions/module.bak/alias_method.rb
-- lib/qualitysmith_extensions/module.bak/includable_once.rb
-- lib/qualitysmith_extensions/module.bak/mattr_tester.rb
-- lib/qualitysmith_extensions/module.bak/create_setter.rb
-- lib/qualitysmith_extensions/module.bak/attribute_accessors.rb
-- lib/qualitysmith_extensions/module.bak/bool_attr_accessor.rb
 - lib/qualitysmith_extensions/dir/each_child.rb
 - lib/qualitysmith_extensions/object/singleton_send.rb
 - lib/qualitysmith_extensions/object/mcall.rb

data/lib/qualitysmith_extensions/module.bak/alias_method.rb

@@ -1,6 +0,0 @@
-# Idea:
-#   Allow using hashes:
-#     alias_method :code_review => :view_commits 
-#     instead of 
-#     alias_method :code_review, :view_commits
-#   because I always forget which argument becomes the argument for which

data/lib/qualitysmith_extensions/module.bak/attribute_accessors.rb

@@ -1,46 +0,0 @@
-# Copied from ActiveSupport because I couldn't get the ones in Facets to work...
-
-# Extends the module object with module and instance accessors for class attributes, 
-# just like the native attr* accessors for instance attributes.
-class Module # :nodoc:
-  def mattr_reader(*syms)
-    syms.each do |sym|
-      class_eval(<<-EOS, __FILE__, __LINE__+1)
-        unless defined? @@#{sym}
-          @@#{sym} = nil
-        end
-        
-        def self.#{sym}
-          @@#{sym}
-        end
-
-        def #{sym}
-          @@#{sym}
-        end
-      EOS
-    end
-  end
-  
-  def mattr_writer(*syms)
-    syms.each do |sym|
-      class_eval(<<-EOS, __FILE__, __LINE__+1)
-        unless defined? @@#{sym}
-          @@#{sym} = nil
-        end
-        
-        def self.#{sym}=(obj)
-          @@#{sym} = obj
-        end
-
-        def #{sym}=(obj)
-          @@#{sym} = obj
-        end
-      EOS
-    end
-  end
-  
-  def mattr_accessor(*syms)
-    mattr_reader(*syms)
-    mattr_writer(*syms)
-  end
-end

data/lib/qualitysmith_extensions/module.bak/bool_attr_accessor.rb

@@ -1,334 +0,0 @@
-#--
-# Author::    Thomas Sawyer, Tyler Rick
-# Copyright:: Copyright (c) Thomas Sawyer, probably, since this is a derivative work
-# License::   Ruby License
-# Submit to Facets?:: Yes
-# Developer notes::
-# * Based on /usr/lib/ruby/gems/1.8/gems/facets-1.8.54/lib/facets/core/module/attr_tester.rb
-# * Hey Thomas, don't you think Module#attr_tester should only create the read-only a? method and have another method that creates the writer (like there how we have attr_reader, _writer, and _accessor?) ? "tester" does not imply "setter" in my mind...
-# * I'm going to rename this one to bool_attr_accessor, which calls both bool_attr_reader and bool_attr_writer
-# * Then you also have the option to use bool_attr_reader and bool_attr_writer separately if you so desire.
-# * Other changes made:
-#   * Changed it so that if you call a!(false) it would actually set @a to false rather than leaving it unchanged. (I assume that was a bug.)
-#++
-
-
-class Module
-
-  # This creates two methods for each given variable name. One is used to test
-  # the attribute and the other is used to set or toggle it.
-  #
-  #   bool_attr_accessor :a
-  #
-  # is equivalent to
-  #
-  #   def a?
-  #     @a ? true : @a
-  #   end
-  #
-  #   def a!(switch=Exception)
-  #     if switch == Exception
-  #       @a = !@a
-  #     else
-  #       @a = switch ? true : false
-  #       self
-  #     end
-  #   end
-  #
-  # Examples:
-  #   x = Klass.new
-  #   x.a! true   # sets @a to true
-  #   x.a!        # toggles @a, so that it ends up being false
-  #   x.a!        # toggles @a, so that it ends up being true
-  #   x.a! false  # sets @a to false
-  #
-  def bool_attr_accessor(*args)
-
-    make = {}
-    args.each { |a|
-      make["#{a}?".to_sym] = %{
-        def #{a}?(true_value=true)
-          @#{a} ? true_value : @#{a}
-        end
-      }
-      make["#{a}!".to_sym] = %{
-        def #{a}!(switch=Exception)
-          if switch == Exception
-            @#{a} = !@#{a}
-          else
-            @#{a} = switch ? true : false
-                    # used to be @#{a} instead of false in Facets version
-            self
-          end
-        end
-      }
-    }
-    module_eval make.values.join("\n"), __FILE__, __LINE__
-
-    make.keys
-  end
-
-end
-
-class Module
-  # This creates two methods for each given variable name. One is used to test
-  # the attribute and the other is used to set or toggle it.
-  #
-  #   bool_attr_accessor :a
-  #
-  # is equivalent to
-  #
-  #   def self.a?
-  #     @@a ? true : @@a
-  #   end
-  #
-  #   def self.a!(switch=Exception)
-  #     if switch == Exception
-  #       @@a = !@@a
-  #     else
-  #       @@a = switch ? true : false
-  #       self
-  #     end
-  #   end
-  #
-  # Works for both classes and modules.
-  #
-  def mbool_attr_accessor(*args)
-
-    make = {}
-    args.each { |a|
-      # Initialize it first so that we won't have any NameErrors.
-      module_eval %{ @@#{a} = nil if !defined?(@@#{a}) }, __FILE__, __LINE__
-
-      make["#{a}?".to_sym] = %{
-        def self.#{a}?(true_value=true)
-          @@#{a} ? true_value : @@#{a}
-        end
-      }
-      make["#{a}!".to_sym] = %{
-        def self.#{a}!(switch=Exception)
-          if switch == Exception
-            @@#{a} = !@@#{a}
-          else
-            @@#{a} = switch ? true : false
-            self
-          end
-        end
-      }
-    }
-    module_eval make.values.join("\n"), __FILE__, __LINE__
-
-    make.keys
-  end
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-require 'test/unit'
-require 'rubygems'
-require 'qualitysmith_extensions/object/ignore_access'
-require 'set'
-
-# Test that it works for *instances*
-class TestBoolAttr < Test::Unit::TestCase
-  def setup
-    @x = C.new
-  end
-
-  class C
-    bool_attr_accessor :a
-  end
-
-  class C_for_default_is_nil
-    bool_attr_accessor :a
-  end
-
-  def test1_default_is_nil
-    assert_equal nil, C_for_default_is_nil.new.a? 
-  end
-
-  def test2_toggle
-    assert_equal nil, @x.a? 
-    @x.a!
-    assert_equal true, @x.a? 
-    @x.a!
-    assert_equal false, @x.a? 
-  end
-
-  def test3_setter
-    @x.a! true
-    @x.a! true
-    assert_equal true, @x.a? 
-
-    @x.a! false 
-    assert_equal false, @x.a? 
-  end
-  def test4_sets_to_boolean_even_if_try_to_set_to_other_type
-    @x.a! "whatever" 
-    assert_equal true, @x.a?     # Still returns a boolean even though we tried to set it to a string.
-
-    @x.a! nil
-    assert_equal false, @x.a?    # Still returns a boolean even though we tried to set it to nil.
-  end
-end
-
-# Test that it works for *modules*
-class TestForModules < Test::Unit::TestCase
-
-  class M_for_default_is_nil
-    mbool_attr_accessor :a
-  end
-  def test1_default_is_nil
-    assert_equal nil, M_for_default_is_nil.a? 
-  end
-
-  module M
-    mbool_attr_accessor :a
-  end
-  def test2_toggle
-    assert_equal nil, M.a? 
-    M.a!
-    assert_equal true, M.a? 
-    M.a!
-    assert_equal false, M.a? 
-  end
-  def test3_setter
-    M.a! true
-    M.a! true
-    assert_equal true, M.a? 
-
-    M.a! false 
-    assert_equal false, M.a? 
-  end
-  def test4_sets_to_boolean_even_if_try_to_set_to_other_type
-    M.a! "whatever" 
-    assert_equal true, M.a?     # Still returns a boolean even though we tried to set it to a string.
-
-    M.a! nil
-    assert_equal false, M.a?    # Still returns a boolean even though we tried to set it to nil.
-  end
-end
-
-# Test that it also works for *classes*
-class TestForClasses < Test::Unit::TestCase
-
-  class C_for_default_is_nil
-    mbool_attr_accessor :a
-  end
-  def test1_default_is_nil
-    assert_equal nil, C_for_default_is_nil.a? 
-  end
-
-  class C
-    mbool_attr_accessor :a
-  end
-
-  def test2_toggle
-    C.access.class_variable_set :@@a, false 
-    assert_equal false, C.a?    # otherwise would have been nil
-    C.a!
-    assert_equal true, C.a? 
-    C.a!
-    assert_equal false, C.a? 
-
-    assert_equal ["@_ignore_access_functor"], C.instance_variables
-    assert_equal ["@@a"], C.class_variables
-  end
-
-  def test3_setter
-    C.a! true
-    C.a! true
-    assert_equal true, C.a? 
-
-    C.a! false 
-    assert_equal false, C.a? 
-  end
-  def test4_sets_to_boolean_even_if_try_to_set_to_other_type
-    C.a! "whatever" 
-    assert_equal true, C.a?     # Still returns a boolean even though we tried to set it to a string.
-
-    C.a! nil
-    assert_equal false, C.a?    # Still returns a boolean even though we tried to set it to nil.
-  end
-end
-
-
-# Observation: You can also the normal bool_attr_accessor in conjunction with class << self.
-# The methods generated seem to *behave* in the same way. Both techniques allow you to query the class, C.a?
-# The only difference is in which *variables* are use to store the state:
-# * class << self and the normal bool_attr_accessor:
-#   Stores the state in an instance variable for the *class*: @a
-# * mbool_attr_accessor:
-#   Stores the state in a *class* variable: @@a
-#
-# Can someone explain to me the difference between class variables and instance variables of a class?
-# It seems silly (confusing even!) to have both of them!
-#
-# My best explanation is that the fact that we can even *have* instance variables of a class does *not* mean it's a good idea
-# to use them. It simply means that Matz made the language with as few arbitrary restrictions as possible. He made it
-# technically *possible* to do a lot of things that it is probably not good practice to do... And one of those things is
-# using instance variables of classes to store state information for that class.
-#
-# What do you think class variables are for? Exactly that! There's a *reason* we have both @a and @@a variables -- to
-# *differentiate* between the two kinds of variables and keep programmers sane. So please don't blur the distinction and
-# use the @a-type variable to do the job that @@a-type variables are for.
-#
-# Or am I missing something here?
-#
-class TestWith_class_self_and_plain_bool_attr_accessor < Test::Unit::TestCase
-
-  class C_for_default_is_nil
-    class << self
-      bool_attr_accessor :a
-    end
-  end
-  def test1_default_is_nil
-    assert_equal nil, C_for_default_is_nil.a? 
-  end
-
-  class C
-    class << self
-      bool_attr_accessor :a
-    end
-  end
-  # This is where I spotted a class that uses this technique:
-  # * Test::Unit::Assertions::AssertionMessage
-
-  def test_2_toggle
-    assert_equal false, C.a?  # Why isn't it nil like it is for the instance use case of bool_attr_accessor?
-    C.a!
-    assert_equal true, C.a? 
-    C.a!
-    assert_equal false, C.a? 
-
-    assert_equal ["@a"], C.instance_variables
-    assert_equal [], C.new.instance_variables  # @a is an instance variable of the *class*  *not* objects of the class  -- weird!
-    assert_equal [], C.class_variables
-  end
-
-  def test3_setter
-    C.a! true
-    C.a! true
-    assert_equal true, C.a? 
-
-    C.a! false 
-    assert_equal false, C.a? 
-  end
-  def test4_sets_to_boolean_even_if_try_to_set_to_other_type
-    C.a! "whatever" 
-    assert_equal true, C.a?     # Still returns a boolean even though we tried to set it to a string.
-
-    C.a! nil
-    assert_equal false, C.a?    # Still returns a boolean even though we tried to set it to nil.
-  end
-
-end
-=end
-

data/lib/qualitysmith_extensions/module.bak/create_setter.rb

@@ -1,9 +0,0 @@
-#create_setter/constructor :_F, :filename
-#create_setter/constructor :initialize, :filename do
-#  extra constructor stuff
-#end
-#
-#      def _F(filename)
-#        @filename = filename
-#      end
-#