Was stimmt nicht mit meinem Code in sml?
Ich weiß nicht, warum mein Code nicht funktioniert.
fun lookup _ [] = 0
| lookup key ((k,v)::entries) =
if k = key
then v
else (lookup key entries)
Das ist passiert, als ich es in cmd getestet habe.
val lookup = fn : ''a -> (''a * int) list -> int
- lookup (1,[(1,2),(2,3)]);
val it = fn : ((int * (int * int) list) * int) list -> int