 package stutter 
 {
 	import org.flexunit.assertThat;
+	import org.hamcrest.Matcher;
 	import org.hamcrest.collection.array;
 	import org.hamcrest.collection.emptyArray;
 	import org.hamcrest.object.equalTo;

		{
			runtime = new StutterRunTime();
			reader = new StutterReader();
		}

		[Test]

			assertThat('false?', eval('(and (eq 2 2) (eq 3 4))'), equalTo(FALSE));
		}

		[Test]
		public function cond_():void 
		{
			assert('(cond)', FALSE);
			assert('(cond (t 1))', 1);
			assert('(cond (nil 1) (t 2))', 2);
			assert('(cond (else 3))', 3);
			assert('(cond ((= 1 2) 3) (else 4))', 4);

			eval(<![CDATA[

				(label cond-test (quote (lambda (x)
					(cond ((= x 1) 1)
					  	  ((= x 2) 2)
					  	  ((= x 3) 3)))))

				]]>.toString());

			assert('(cond-test 3)', 3);
		}
	}
}