diff options
-rw-r--r-- | guiletopy.c | 4 | ||||
-rw-r--r-- | pyguile.c | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/guiletopy.c b/guiletopy.c index 1850e33..84ce7d7 100644 --- a/guiletopy.c +++ b/guiletopy.c @@ -347,7 +347,7 @@ g2p_bignum2Long(SCM sobj,SCM stemplate) } SCM swrite_proc = scm_variable_ref(scm_c_lookup("write")); SCM sbignumstr = scm_object_to_string(sobj,swrite_proc); - char *pstr = gh_scm2newstr(sbignumstr,NULL); + char *pstr = scm_to_locale_string(sbignumstr); if (NULL == pstr) { scm_memory_error("g2p_bignum2Long"); // NOT COVERED BY TESTS } @@ -687,7 +687,7 @@ g2p_string2String(SCM sobj,SCM stemplate) if (pyguile_verbosity_test(PYGUILE_VERBOSE_G2P2G_SUCCESSFUL)) { scm_simple_format(scm_current_output_port(),scm_makfrom0str("# g2p_string2String: successful conversion of ~S into a Python String value\n"),scm_list_1(sobj)); } - PyObject *pstr = PyString_FromStringAndSize(SCM_STRING_CHARS(sobj),SCM_STRING_LENGTH(sobj)); + PyObject *pstr = PyString_FromStringAndSize(scm_to_locale_string(sobj),SCM_STRING_LENGTH(sobj)); if (NULL == pstr) { scm_memory_error("g2p_string2String"); // NOT COVERED BY TESTS } @@ -341,7 +341,7 @@ python_eval(SCM sobj,SCM smode) ? Py_file_input : Py_eval_input; - char *pstr = gh_scm2newstr(sobj,NULL); + char *pstr = scm_to_locale_string(sobj); if (NULL == pstr) { scm_memory_error("python-eval"); // NOT COVERED BY TESTS //return(SCM_UNSPECIFIED); @@ -414,7 +414,7 @@ python_import(SCM smodulename) scm_wrong_type_arg("python-import",SCM_ARG1,smodulename); } else { - char *mname = gh_scm2newstr(smodulename,NULL); + char *mname = scm_to_locale_string(smodulename); PyObject *pmodule = PyImport_ImportModule(mname); PyObject *pexception = PyErr_Occurred(); if (pexception) { |