Dolda2000 GitWeb
/
doldaconnect.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Updated spec files for the new library version.
[doldaconnect.git]
/
lib
/
guile
/
dolcon-guile.c
diff --git
a/lib/guile/dolcon-guile.c
b/lib/guile/dolcon-guile.c
index
e3e6db8
..
f0abc2f
100644
(file)
--- a/
lib/guile/dolcon-guile.c
+++ b/
lib/guile/dolcon-guile.c
@@
-184,10
+184,13
@@
static SCM scm_dc_intresp(SCM scm_resp)
ret = scm_cons(scm_makfrom0str(icswcstombs(ires->argv[i].val.str, "UTF-8", NULL)), ret);
break;
case 2:
ret = scm_cons(scm_makfrom0str(icswcstombs(ires->argv[i].val.str, "UTF-8", NULL)), ret);
break;
case 2:
- ret = scm_cons(scm_
int2num
(ires->argv[i].val.num), ret);
+ ret = scm_cons(scm_
from_int
(ires->argv[i].val.num), ret);
break;
case 3:
break;
case 3:
- ret = scm_cons(scm_double2num(ires->argv[i].val.flnum), ret);
+ 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);
break;
}
}
break;
}
}