Miroirs/newrpl
1
0
Fork 0
mirror of https://git.code.sf.net/p/newrpl/sources synced 2024-11-16 19:51:25 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixed bug: EVAL vs running from menu would cause different local environments to be created

Browse source
This commit is contained in:
claudiol 2017-08-09 18:36:37 -04:00
parent 859a14ec15
commit 22d37705e9
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
newrpl/lam.c
View file

@ -324,7 +324,7 @@ BINT rplNeedNewLAMEnv()
if(nLAMBase>=LAMs && nLAMBase<LAMTop) {
if((ISPROLOG(**(nLAMBase+1)) && ((LIBNUM(**(nLAMBase+1))==SECO)||(LIBNUM(**(nLAMBase+1))==DOCOL)))
|| (**(nLAMBase+1)==(CMD_OVR_EVAL))) {
|| (**(nLAMBase+1)==(CMD_OVR_EVAL)) || (**(nLAMBase+1)==(CMD_OVR_EVAL1)) || (**(nLAMBase+1)==(CMD_OVR_XEQ))) {
// THIS ENVIRONMENT BELONGS TO A SECONDARY
if(*(nLAMBase+1)==seco) {
// FOUND AN ENVIRONMENT THAT BELONGS TO THE CURRENT SECONDARY, SO NO NEED FOR ONE