#define FUNC_NAME s_scm_add_history
{
char* s;
- SCM_VALIDATE_STRING(1,text);
+ SCM_VALIDATE_STRING (1,text);
SCM_COERCE_SUBSTR (text);
s = SCM_CHARS (text);
"")
#define FUNC_NAME s_scm_read_history
{
- SCM_VALIDATE_STRING(1,file);
+ SCM_VALIDATE_STRING (1,file);
return SCM_NEGATE_BOOL(read_history (SCM_ROCHARS (file)));
}
#undef FUNC_NAME
"")
#define FUNC_NAME s_scm_write_history
{
- SCM_VALIDATE_STRING(1,file);
+ SCM_VALIDATE_STRING (1,file);
return SCM_NEGATE_BOOL(write_history (SCM_ROCHARS (file)));
}
#undef FUNC_NAME
{
char *s;
SCM ans;
- SCM_VALIDATE_STRING(1,text);
+ SCM_VALIDATE_STRING (1,text);
SCM_COERCE_SUBSTR (text);
s = filename_completion_function (SCM_CHARS (text), SCM_NFALSEP (continuep));
ans = scm_makfrom0str (s);