From 056e3470c4a0c18366c1da4f5052f36761824b70 Mon Sep 17 00:00:00 2001
From: Mark H Weaver <mhw@netris.org>
Date: Thu, 8 Aug 2013 02:19:46 -0400
Subject: [PATCH] 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'.
---
 libguile/numbers.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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))
     {