diff options
| author | Shinya Sato <shinnya.sato@gmail.com> | 2021-11-10 19:45:10 +0900 |
|---|---|---|
| committer | Shinya Sato <shinnya.sato@gmail.com> | 2021-11-10 19:45:10 +0900 |
| commit | eb72e29f596d8decfd4bb991178a4a8a90730524 (patch) | |
| tree | 422567aba2326ada689c17fd5dd184907347394c /src/inpla.y | |
| parent | 7c9922173332e3a8fc93d35ede57535e97555969 (diff) | |
| parent | 748d341119da2d955c10cc797318280bab5f1237 (diff) | |
| download | inpla-eb72e29f596d8decfd4bb991178a4a8a90730524.tar.gz inpla-eb72e29f596d8decfd4bb991178a4a8a90730524.zip | |
Merge branch 'develop'
Diffstat (limited to '')
| -rw-r--r-- | src/inpla.y | 20 |
1 files changed, 13 insertions, 7 deletions
diff --git a/src/inpla.y b/src/inpla.y index 7b13db5..928a5c1 100644 --- a/src/inpla.y +++ b/src/inpla.y @@ -21,7 +21,7 @@ //#define COUNT_CNCT // count of execution of JMP_CNCT //#define COUNT_MKAGENT // count of execution fo mkagent -#define CELL_USE_VERBOSE // count of memory access +//#define CELL_USE_VERBOSE // count of memory access @@ -48,8 +48,8 @@ int ActiveThreadNum=0; //#define YYDEBUG 1 -#define VERSION "0.5.1" -#define BUILT_DATE "2 Nov. 2021" +#define VERSION "0.5.2" +#define BUILT_DATE "10 Nov. 2021" extern FILE *yyin; @@ -1278,12 +1278,18 @@ void freeName(VALUE ptr) { void freeAgentRec(VALUE ptr) { - + loop: - if ((IS_FLAG_AVAIL(BASIC(ptr)->id)) || - (IS_FIXNUM(ptr)) || (ptr == (VALUE)NULL)) { + if ((IS_FIXNUM(ptr)) || (ptr == (VALUE)NULL)) { return; - } else if (IS_NAMEID(BASIC(ptr)->id)) { + } + + if (IS_FLAG_AVAIL(BASIC(ptr)->id)) { + return; + } + + + if (IS_NAMEID(BASIC(ptr)->id)) { if (ptr == ShowNameHeap) return; if (NAME(ptr)->port != (VALUE)NULL) { |