2013-02-10 90 views
-1

如果我已經定義了這樣的試驗:如何評估測試?

val neg = Test (fn x => x < 0, "neg"); 

如何測試呢? 我試圖

neg 3; 

,但我得到一個錯誤......

+3

也許未來你可能會包含實際的代碼和錯誤。至少這會讓人們有機會幫助你出去! – 2013-02-12 05:06:35

回答

1

從外觀上來看,Test是值構造,這樣的話你應該「解包」,然後才能訪問裏面的一對。

像這樣的事情應該由具有解開測試並運行它的功能做的工作

val Test (f, s) = Test (fn x => x < 0, "neg") 
f 3 
1

你可以這樣做:

fun runtest Test(f,s) x = f x 

你會那麼做

runtest neg 3