1 files changed, 1 insertions, 1 deletions
diff --git a/rules.y b/rules.y
index 31d70d0..837e3f7 100644
--- a/rules.y
+++ b/rules.y
@@ -1270,7 +1270,7 @@ v1:
         = { /* if(tag[$2]==DOUBLE)
               $$ = cons(CONST,sto_dbl(-get_dbl($2))); else */
             if(tag[$2]==INT)
-              $$ = cons(CONST,bignegate($2)); else
+              $$ = cons(CONST,big_negate($2)); else
             syntax("inappropriate use of \"-\" in pattern\n"); }|
     v2 INFIXNAME v1
         = { $$ = ap2($2,$1,$3); }|