Fixed typo in guile intresp.

[doldaconnect.git] / lib / guile / dolcon-guile.c

diff --git a/lib/guile/dolcon-guile.c b/lib/guile/dolcon-guile.c
index f0abc2f..553c7d5 100644 (file)
--- 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;
        }
     }