Submit better fix to the prompt bug.
This commit is contained in:
parent
f476d38a01
commit
e1266cedab
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/head/; revision=40977
@ -221,8 +221,10 @@ int ficlExec(FICL_VM *pVM, char *pText)
|
||||
break;
|
||||
|
||||
case VM_OUTOFTEXT:
|
||||
#ifdef TESTMAIN
|
||||
if ((pVM->state != COMPILE) && (pVM->sourceID.i == 0))
|
||||
ficlTextOut(pVM, FICL_PROMPT, 0);
|
||||
#endif
|
||||
break;
|
||||
|
||||
case VM_USEREXIT:
|
||||
|
@ -207,10 +207,8 @@ struct ficl_dict;
|
||||
** the Good Stuff starts here...
|
||||
*/
|
||||
#define FICL_VER "2.02"
|
||||
#ifdef TESTMAIN
|
||||
#ifndef FICL_PROMPT
|
||||
# define FICL_PROMPT "ok> "
|
||||
#else
|
||||
# define FICL_PROMPT ""
|
||||
#endif
|
||||
|
||||
/*
|
||||
|
Loading…
Reference in New Issue
Block a user