[chatter] r11778 - in trunk/fundev/sources: dylan/tests functional-dylan/tests system/locators system/tests

Author: cgay
Date: Sun Apr 27 13:13:03 2008
New Revision: 11778

Modified:
   trunk/fundev/sources/dylan/tests/control.dylan
   trunk/fundev/sources/functional-dylan/tests/functions.dylan
   trunk/fundev/sources/system/locators/web-locators.dylan
   trunk/fundev/sources/system/tests/date.dylan
   trunk/fundev/sources/system/tests/temp-files.dylan
Log:
job: fd
Fixed some compiler warnings in the dylan-test-suite.  Please
carefully review the change from check-equal to check-condition.  I
convinced myself this is correct after reading the Parameter Lists
section in the DRM again, but it's a bit complicated.

A few other minor changes as well.

Modified: trunk/fundev/sources/dylan/tests/control.dylan
==============================================================================
--- trunk/fundev/sources/dylan/tests/control.dylan	(original)
+++ trunk/fundev/sources/dylan/tests/control.dylan	Sun Apr 27 13:13:03 2008
@@ -488,11 +488,11 @@
   check-equal("one param call one arg",
 	     (method (x) x end)(1), 1);
   check-condition("no param call one arg", <error>,
-   		  no-param-function(1));
+                  apply(no-param-function, #[1]));
   check-condition("one param call no args", <error>,