with-history ( path quot -- )


Vocabulary
readline

Inputs
pathan object
quotan object


Outputs
None

Definition
USING: continuations libc readline.ffi ;

IN: readline

:: with-history ( path quot -- )
path read_history io-error quot
[ path write_history io-error ] finally ; inline