diff options
Diffstat (limited to 'libguile/control.c')
-rw-r--r-- | libguile/control.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/libguile/control.c b/libguile/control.c index 0686924d5..b9ecff1e1 100644 --- a/libguile/control.c +++ b/libguile/control.c @@ -49,16 +49,13 @@ SCM_DEFINE (scm_atprompt, "@prompt", 4, 0, 0, #undef FUNC_NAME SCM -scm_c_make_prompt (SCM vm, SCM k, SCM handler, scm_t_uint8 inline_handler_p, - scm_t_uint8 escape_only_p) +scm_c_make_prompt (SCM vm, SCM k, SCM handler, scm_t_uint8 escape_only_p) { scm_t_bits tag; SCM ret; struct scm_prompt_registers *regs; tag = scm_tc7_prompt; - if (inline_handler_p) - tag |= SCM_F_PROMPT_INLINE; if (escape_only_p) tag |= SCM_F_PROMPT_ESCAPE; ret = scm_words (tag, 5); |