summaryrefslogtreecommitdiff
path: root/complex.c
diff options
context:
space:
mode:
Diffstat (limited to 'complex.c')
-rw-r--r--complex.c13
1 files changed, 6 insertions, 7 deletions
diff --git a/complex.c b/complex.c
index 18d61b206f..c4f0f5e8c9 100644
--- a/complex.c
+++ b/complex.c
@@ -704,14 +704,13 @@ nucomp_s_polar(int argc, VALUE *argv, VALUE klass)
{
VALUE abs, arg;
- switch (rb_scan_args(argc, argv, "11", &abs, &arg)) {
- case 1:
- nucomp_real_check(abs);
- return nucomp_s_new_internal(klass, abs, ZERO);
- default:
- nucomp_real_check(abs);
+ argc = rb_scan_args(argc, argv, "11", &abs, &arg);
+ nucomp_real_check(abs);
+ if (argc == 2) {
nucomp_real_check(arg);
- break;
+ }
+ else {
+ arg = ZERO;
}
return f_complex_polar(klass, abs, arg);
}