expressions: Simplify type declarations for nodes.

[pspp] / src / language / expressions / operations.def

diff --git a/src/language/expressions/operations.def b/src/language/expressions/operations.def
index 6aae2e2f05f5692d5ab4ba71605c1ecda38b935c..cc24f98751ef84db7861baadaef01e90b33321d9 100644 (file)
--- a/src/language/expressions/operations.def
+++ b/src/language/expressions/operations.def
@@ -677,20 +677,14 @@ absorb_miss no_opt no_abbrev string function VALUELABEL (var v)
 
 // Artificial.
 operator SQUARE (x) = x * x;
-boolean operator NUM_TO_BOOLEAN (x, string op_name)
+boolean operator NUM_TO_BOOLEAN (x)
 {
   if (x == 0. || x == 1. || x == SYSMIS)
     return x;
 
-  if (!ss_is_empty (op_name))
-    msg (SE, _("An operand of the %.*s operator was found to have a value "
-               "other than 0 (false), 1 (true), or the system-missing "
-               "value.  The result was forced to 0."),
-         (int) op_name.length, op_name.string);
-  else
-    msg (SE, _("A logical expression was found to have a value other than 0 "
-               "(false), 1 (true), or the system-missing value.  The result "
-               "was forced to 0."));
+  msg (SE, _("A logical expression was found to have a value other than 0 "
+             "(false), 1 (true), or the system-missing value.  The result "
+             "was forced to 0."));
   return 0.;
 }