source file of the GNU LilyPond music typesetter
- (c) 2004--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 2004--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include <cstdlib>
SCM_ARG1, __FUNCTION__, "string");
string file_name = ly_scm2string (pfb_file_name);
- int len = -1;
if (be_verbose_global)
progress_indication ("[" + file_name);
- char *str = gulp_file (file_name, &len);
- char *pfa = pfb2pfa ((Byte *)str, len);
-
- SCM pfa_scm = scm_makfrom0str (pfa);
+ vector<char> pfb_string = gulp_file (file_name, 0);
+ char *pfa = pfb2pfa ((Byte *) &pfb_string[0], pfb_string.size ());
+
+ SCM pfa_scm = scm_from_locale_string (pfa);
free (pfa);
- delete str;
+
if (be_verbose_global)
progress_indication ("]");