unoidl2

commit 2ea341380b1bec4991dcc427fa90081dc02c658b
parent 9dc08dcd8a9be93a23a53a92783633db3ebe4cc9
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sun, 22 Jan 2012 19:05:48 +0100

fix 'some'

Diffstat:
M
unoidl2.c
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/unoidl2.c b/unoidl2.c
@@ -167,7 +167,7 @@ Any some(Fn1 test, Any lst) {
     Any x = test(car(lst));
     if(NIL != x) return x;
   }
-  return 0;
+  return NIL;
 }
 
 Any mapc(void *env, Any (*fn)(void *env, Any e), Any x) {