Changeset 17868 for src/Pugs/Prim/List.hs

Timestamp:

09/16/07 14:47:13 (14 months ago)

Author:

moritz

Message:

List.hs: .first returns undef if no match was found
A haskell guru should look at that code to check it ;)

Files:

• src/Pugs/Prim/List.hs (modified) (1 diff)

src/Pugs/Prim/List.hs

@@ -337 +337 @@
   if (length vals) > 0 
     then return $ (vals !! 0)
-    else fail $ "Cannot call first() with a filter that removes all elements from the input list"
+    else return $ undef
 
 op2Map :: Val -> Val -> Eval Val