diff options
Diffstat (limited to 'lib/bigrat.pl')
| -rw-r--r-- | lib/bigrat.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/bigrat.pl b/lib/bigrat.pl index 3157cf8244..008befff20 100644 --- a/lib/bigrat.pl +++ b/lib/bigrat.pl @@ -75,7 +75,7 @@ sub main'rneg { #(rat_num) return rat_num # absolute value sub main'rabs { #(rat_num) return $rat_num local($_) = &'rnorm($_[0]); - substr($_,0,1) = '+'; + substr($_,0,1) = '+' unless $_ eq 'NaN'; $_; } |