+ vector<char> type1_string = gulp_file (file_name, 0);
+ SCM pfa_scm;
+
+ if ((Byte) type1_string[0] == 0x80)
+ {
+ /* The file is in PFB format. Convert it to PFA format. */
+ vector<char> pfa = pfb2pfa (type1_string);
+ pfa_scm = scm_from_latin1_stringn (&pfa[0], pfa.size ());
+ }
+ else
+ {
+ /* The file is in PFA format. Pass it through. */
+ pfa_scm = scm_from_latin1_stringn (&type1_string[0],
+ type1_string.size ());
+ }
+
+ debug_output ("]", false);