From: Christian Bauer <Christian.Bauer@uni-mainz.de>
Date: Thu, 24 Feb 2000 18:06:40 +0000 (+0000)
Subject: - default maxargs for functions is 13 to make the current xloops compile
X-Git-Tag: release_0-5-4~21
X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=commitdiff_plain;h=ca04cff6c8e848782a4e123688a6edbb38821884

- default maxargs for functions is 13 to make the current xloops compile
  out-of-the-box
- small fix for abs(): eval() function was not set properly
---

diff --git a/ginac/function.pl b/ginac/function.pl
index cb0fe80f..4a218bbe 100755
--- a/ginac/function.pl
+++ b/ginac/function.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 
-$maxargs=10;
+$maxargs=13;
 
 sub generate_seq {
     my ($seq_template,$n)=@_;
diff --git a/ginac/inifcns.cpp b/ginac/inifcns.cpp
index b3527e9c..bc401f47 100644
--- a/ginac/inifcns.cpp
+++ b/ginac/inifcns.cpp
@@ -62,7 +62,7 @@ static ex abs_eval(const ex & x)
         return abs(x).hold();
 }
 
-REGISTER_FUNCTION(abs, evalf_func(abs_eval).
+REGISTER_FUNCTION(abs, eval_func(abs_eval).
                        evalf_func(abs_evalf));
 
 //////////