summaryrefslogtreecommitdiff
path: root/libguile/numbers.c
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2013-08-08 02:19:46 -0400
committerMark H Weaver <mhw@netris.org>2013-08-08 02:19:46 -0400
commit056e3470c4a0c18366c1da4f5052f36761824b70 (patch)
tree2780e7cce447da365f9057e1b728a47c45fa86d5 /libguile/numbers.c
parent789dd40b8b3c3dab230cbb407c8435b430d6a18a (diff)
downloadguile-056e3470c4a0c18366c1da4f5052f36761824b70.tar.gz
Eliminate use of deprecated 'SCM_WTA_DISPATCH_2' in numbers.c.
* libguile/numbers.c (scm_gcd): Use 'scm_wta_dispatch_2' not 'SCM_WTA_DISPATCH_2'.
Diffstat (limited to 'libguile/numbers.c')
-rw-r--r--libguile/numbers.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c
index f549193b5..3cdc7fd16 100644
--- a/libguile/numbers.c
+++ b/libguile/numbers.c
@@ -4175,7 +4175,7 @@ scm_gcd (SCM x, SCM y)
else if (SCM_REALP (y) && scm_is_integer (y))
goto handle_inexacts;
else
- SCM_WTA_DISPATCH_2 (g_gcd, x, y, SCM_ARG2, s_gcd);
+ return scm_wta_dispatch_2 (g_gcd, x, y, SCM_ARG2, s_gcd);
}
else if (SCM_REALP (x) && scm_is_integer (x))
{