All the power of unit testing condensed in a 3 ...

buraq · buraq · commit f6ca2753186f · 2003-05-06T15:25:56.000Z
All the power of unit testing condensed in a 3 lines higher-order
function. join the "I love Applications of Functional Programming" club.
diff --git a/sources/scala/UnitTest.scala b/sources/scala/UnitTest.scala
@@ -0,0 +1,42 @@
+package scala ;
+
+object UnitTest {
+
+            def test[b,a]( doit:b => a,
+                              input: b,
+                              expectedResult:a ):Unit = {
+
+                if( doit(input) == expectedResult )
+                        {
+                         System.out.println("passed ok")
+                        }
+                else
+                        {
+                         System.out.print("failed! we got");
+                         System.out.print( "\""+doit(input).toString()+"\"" );
+                         System.out.println(" but expected "+expectedResult)
+                        }
+
+            } // testAlg
+
+            def test2[c,b,a]( doit:(c,b) => a,
+                              in1: c,
+                              in2: b,
+                              expectedResult:a ):Unit = {
+
+                if( doit(in1,in2) == expectedResult )
+                        {
+                         System.out.println("passed ok")
+                        }
+                else
+                        {
+                         System.out.print("failed! we got");
+                         System.out.print( "\""+doit(in1,in2).toString()+"\"" );
+                         System.out.println(" but expected "+expectedResult)
+                        }
+
+            } // testAlg
+
+} // unitTest
+
+
