Lines Matching refs:args
66 @args = split(/:/,$_,99); $ans = pop(@args);
72 $try = "\$x = $class->new(\"$args[0]\");";
75 $try = "\$x = $class->bnorm(\"$args[0]\");";
84 $try .= "\$x->is_inf('$args[1]');";
86 $try .= "\$x->binf('$args[1]');";
88 $try .= "\$x->bone('$args[1]');";
107 if ($args[1] !~ /\./)
109 $try .= "\$y = $class->new(\"$args[1]\");"; # BigInt
113 $try .= "\$y = $ECL->new(\"$args[1]\");"; # BigFloat
144 if (defined $args[2])
146 $try .= " \$z = $class->new('$args[2]'); ";
149 $try .= ", \$z" if (defined $args[2]);
154 if (defined $args[2])
156 $try .= " \$z = $class->new('$args[2]'); ";
159 $try .= ", \$z" if (defined $args[2]);
162 if (defined $args[2])
164 $try .= "\$x->blsft(\$y,$args[2]);";
171 if (defined $args[2])
173 $try .= "\$x->brsft(\$y,$args[2]);";
188 $try = "\$x = $class->new('$args[0]'); \$x->digit($args[1]);";