From: Fredrik Tolf <fredrik@dolda2000.com>
Date: Sun, 22 May 2011 02:03:54 +0000 (+0200)
Subject: Fixed typo in guile intresp.
X-Git-Url: http://git.dolda2000.com/gitweb/?a=commitdiff_plain;h=84f2822dcf4c4fd40a4e6d7a8a2861a8f7a0bccd;p=doldaconnect.git

Fixed typo in guile intresp.
---

diff --git a/lib/guile/dolcon-guile.c b/lib/guile/dolcon-guile.c
index f0abc2f..553c7d5 100644
--- a/lib/guile/dolcon-guile.c
+++ b/lib/guile/dolcon-guile.c
@@ -190,7 +190,7 @@ static SCM scm_dc_intresp(SCM scm_resp)
 	    ret = scm_cons(scm_from_double(ires->argv[i].val.flnum), ret);
 	    break;
 	case 4:
-	    ret = scm_cons(scm_from_int64(ires->argv[i].val.num), ret);
+	    ret = scm_cons(scm_from_int64(ires->argv[i].val.lnum), ret);
 	    break;
 	}
     }