Initial module specs

spec/core/module/alias_method_spec.rb

@@ -0,0 +1,10 @@
+class AliasMethodSpec
+  def foo; 'foo'; end
+  alias_method :bar, :foo
+end
+
+describe "Module#alias_method" do
+  it "makes a copy of the method" do
+    AliasMethodSpec.new.bar.should == 'foo'
+  end
+end

spec/core/module/ancestors_spec.rb

@@ -0,0 +1,11 @@
+module ModuleAncestorsSpec
+  class A; end
+  class B < A; end
+end
+
+describe "Module#ancestors" do
+  it "returns a list of modules in self (including self)" do
+    ModuleAncestorsSpec::B.ancestors.include?(ModuleAncestorsSpec::B).should == true
+    ModuleAncestorsSpec::B.ancestors.include?(ModuleAncestorsSpec::A).should == true
+  end
+end

spec/core/module/append_features_spec.rb

@@ -0,0 +1,14 @@
+module AppendFeaturesSpec
+  class Klass; end
+
+  def self.append_features(mod)
+    ScratchPad.record mod
+  end
+end
+
+describe "Module#append_features" do
+  it "gets called when self is included in another module/class" do
+    AppendFeaturesSpec::Klass.include AppendFeaturesSpec
+    ScratchPad.recorded.should == AppendFeaturesSpec::Klass
+  end
+end