diff --git a/src/testsuite.in b/src/testsuite.in
index 90ec04df5812b0c14b897e6abae1b67d4e25dc27..05437a07cb31cd6f93054147c49e18e7101794c7 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-test_true([["$Id: testsuite.in,v 1.240 1999/11/27 13:59:17 mast Exp $"]]);
+test_true([["$Id: testsuite.in,v 1.241 1999/11/27 14:48:25 mast Exp $"]]);
 
 cond([[all_constants()->_verify_internals]],
 [[
@@ -80,6 +80,11 @@ test_any([[function(:string)|function(mixed, mixed ...:int) f;
 	  return typeof(f(1)); ]],
 	 "int")
 
+test_compile_any([[
+  constant FOO = 0;
+  mapping(int:string) foo = ([FOO: "foo"]);
+]])
+
 test_any([[return class Z {
 string bonk() { return "oiff"; }