add class spec

spec/class_spec.moon

@@ -0,0 +1,98 @@
+
+describe "class", ->
+  it "should make a class with constructor", ->
+    class Thing
+      new: =>
+        @color = "blue"
+
+    instance = Thing!
+
+    assert.same instance, { color: "blue" }
+
+  it "should have instance methods", ->
+    class Thing
+      get_color: => @color
+
+      new: =>
+        @color = "blue"
+
+    instance = Thing!
+    assert.same instance\get_color!, "blue"
+
+
+  it "should have class property", ->
+    class Thing
+      color: "blue"
+      get_color: => @color
+
+    instance = Thing!
+    assert.same instance\get_color!, "blue"
+    assert.same Thing.color, "blue"
+
+  it "should inherit another class", ->
+    class Base
+      get_property: => @[@property]
+
+      new: (@property) =>
+
+    class Thing extends Base
+      color: "green"
+
+    instance = Thing "color"
+    assert.same instance\get_property!, "green"
+
+  it "should call super constructor", ->
+    class Base
+      new: (@property) =>
+
+    class Thing extends Base
+      new: (@name) =>
+        super "name"
+
+    instance = Thing "the_thing"
+
+    assert.same instance.property, "name"
+    assert.same instance.name, "the_thing"
+
+
+  it "should call super method", ->
+    class Base
+      _count: 111
+      counter: => @_count
+
+    class Thing extends Base
+      counter: => "%08d"\format super!
+
+    instance = Thing!
+    assert.same instance\counter!, "00000111"
+
+  it "should get super class", ->
+    class Base
+    class Thing extends Base
+      get_super: => super
+
+    instance = Thing!
+    assert.is_true instance\get_super! == Base
+
+  it "should get a bound method from super", ->
+    class Base
+      count: 1
+      get_count: => @count
+
+    class Thing extends Base
+      get_count: => "this is wrong"
+      get_method: => super\get_count
+
+    instance = Thing!
+    assert.same instance\get_method!!, 1
+
+  it "should have class properties", ->
+    class Base
+    class Thing extends Base
+
+    instance = Thing!
+
+    assert.same Base.__name, "Base"
+    assert.same Thing.__name, "Thing"
+    assert.is_true Thing.__parent == Base
+