diff --git a/src/testsuite.in b/src/testsuite.in
index 5a0d19512a6ae7ddc351e4bca15aa38812867645..b6fb1c28dd53c0bd2c9fa9f22015724c6e3d2fb1 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-test_true([["$Id: testsuite.in,v 1.242 1999/12/02 19:16:50 mirar Exp $"]]);
+test_true([["$Id: testsuite.in,v 1.243 1999/12/02 19:18:30 mirar Exp $"]]);
 
 cond([[all_constants()->_verify_internals]],
 [[
@@ -191,7 +191,7 @@ class Gnu
 
 test_compile_any([[int log() { return 17; } class Greta { int hanna() { return log(); } }]])
 test_compile_any([[int kajsa(int a,int b) { return 17; } class Jenny { int kajsa() { return 17; } class Greta { int hanna() { return kajsa(); } } }]])
-test_any([[add_constant("kajsa",lambda(int a,int b) { return 17; }); return compile_string("int kajsa() { return 17; } class Greta { int hanna() { return kajsa(); } }")()->kajsa()]],1)
+test_any([[add_constant("kajsa",lambda(int a,int b) { return 17; }); return compile_string("int kajsa() { return 17; } class Greta { int hanna() { return kajsa(); } }")()->kajsa()]],17)
 
 test_compile([[Stdio.File foo=Stdio.File();]])
 test_compile([[  string|multiset(string) foo;