moosex_spec.rb in moosex-0.0.2

- old
+ new

@@ -20,11 +20,32 @@
 		self.x= 0
 		self.y= 0
 	end
 end
 
-describe "Point" do
+class Foo
+	include MooseX
+
+	has :bar, {
+		:is => :rwp,
+		:isa => Integer,
+		:required => true
+	}
+end
+
+class Baz
+	include MooseX
+
+	has :bam, {
+		:is => :ro,
+		:isa => lambda {|x| raise 'x should be less than 100' if x > 100},
+		:required => true
+	}
+
+end
+
+describe "MooseX" do
 	describe "should has an intelligent constructor" do
 		it "without arguments, should initialize with default values" do
 			p = Point.new
 			p.x.should be_zero
 			p.y.should be_zero
@@ -39,10 +60,46 @@
 		it "should initialize x and y" do
 			p = Point.new( :x => 5, :y => 4)
 			p.x.should == 5
 			p.y.should == 4
 		end
+
+		it "should require bar if necessary" do 
+			expect {
+				Foo.new
+			}.to raise_error("attr \"bar\" is required")
+		end
+
+		it "should require bar if necessary" do 
+			foo = Foo.new( :bar => 123 )
+			foo.bar.should == 123
+		end
+
+		it "should not be possible update bar (setter private)" do 
+			foo = Foo.new( :bar => 123 )
+			expect {
+				foo.bar = 1024
+			}.to raise_error(NoMethodError)
+		end
+
+		it "should require bam if necessary" do 
+			baz = Baz.new( :bam => 99 )
+			baz.bam.should == 99
+		end
+
+		it "should not be possible update baz (read only)" do 
+			baz = Baz.new( :bam => 99 )
+			expect {
+				baz.bam = 1024
+			}.to raise_error(NoMethodError)
+		end
+
+		it "should run the lambda isa" do 
+			expect {
+				baz = Baz.new( :bam => 199 )
+			}.to raise_error(/x should be less than 100/)
+		end
 	end
 	
 	describe "should create a getter and a setter" do
 		it "for x" do
 			p = Point.new
@@ -50,12 +107,20 @@
 			p.x.should == 5
 		end		
 		
 		it "for x, with type check" do
 			p = Point.new
-			expect { p.x = "lol" }.to raise_error('isa check for "x" failed: lol is not Integer!')
+			expect { 
+				p.x = "lol" 
+			}.to raise_error('isa check for "x" failed: lol is not Integer!')
 		end	
 		
+		it "for x, with type check" do			
+			expect { 
+				Point.new(:x => "lol") 
+			}.to raise_error('isa check for "x" failed: lol is not Integer!')
+		end	
+
 		it "clear should clean attributes" do
 			p = Point.new( :x => 5, :y => 4)
 			p.clear
 			p.x.should be_zero
 			p.y.should be_zero			
\ No newline at end of file