Miroirs/rpn
1
0
Fork 0
mirror of https://github.com/louisrubet/rpn synced 2025-01-16 03:41:28 +01:00
Code Issues Projects Releases Packages Wiki Activity

#49: debug autoeval issue

Browse source
This commit is contained in:
Louis Rubet 2017-05-02 11:33:37 +02:00
parent fd88844f4b
commit fdb7c8bff8
3 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/parse.h
View file

@ -214,6 +214,7 @@ static bool get_symbol(const string& entry, program& prog, string& remaining_ent
// allocate and set object
symbol* new_obj = (symbol*)prog.allocate_back(obj_len, cmd_symbol);
new_obj->_auto_eval = false;
new_obj->set("", 0);
}
else
@ -228,6 +229,7 @@ static bool get_symbol(const string& entry, program& prog, string& remaining_ent
// allocate and set object
symbol* new_obj = (symbol*)prog.allocate_back(obj_len, cmd_symbol);
new_obj->_auto_eval = false;
new_obj->set(entry.substr(1, naked_entry_len).c_str(), naked_entry_len);
}
ret = true;

2
src/rpn-store.h
View file

@ -69,7 +69,7 @@ void edit(void)
// carefull : this is not a langage command
void auto_rcl(symbol* symb)
{
if (!symb->_auto_eval)
if (symb->_auto_eval)
{
object* obj;
unsigned int size;

1
src/rpn.cpp
View file

@ -322,7 +322,6 @@ struct symbol : public object
void set(const char* value, unsigned int len)
{
_type = cmd_symbol;
_auto_eval = false;
if (value != NULL)
{
if (len>0)