SCM *tail = &files;
while (char const *arg = option_parser->get_next_arg ())
{
- *tail = scm_cons (scm_makfrom0str (arg), SCM_EOL);
+ *tail = scm_cons (scm_from_locale_string (arg), SCM_EOL);
tail = SCM_CDRLOC (*tail);
}
be_verbose_global = true;
break;
case 's':
- be_safe_global = true;
init_scheme_variables
+= "(cons \'safe #t)\n";
-
break;
case 'p':
make_preview = true;