diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2019-08-16 09:51:54 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2019-08-16 09:51:54 -0300 |
commit | ca13be9af784b7288d3a07d9b5bccb329086e885 (patch) | |
tree | c027419f98064d681518a4130439920a13a11b06 /ltests.c | |
parent | a1d8eb27431c02c4529be1efd92143ad65434f3a (diff) | |
download | lua-ca13be9af784b7288d3a07d9b5bccb329086e885.tar.gz lua-ca13be9af784b7288d3a07d9b5bccb329086e885.tar.bz2 lua-ca13be9af784b7288d3a07d9b5bccb329086e885.zip |
Supressed errors in '__close' generate warnings
Diffstat (limited to 'ltests.c')
-rw-r--r-- | ltests.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -95,15 +95,15 @@ static void warnf (void *ud, const char *msg, int tocont) { | |||
95 | if (!lasttocont && !tocont && *msg == '@') { /* control message? */ | 95 | if (!lasttocont && !tocont && *msg == '@') { /* control message? */ |
96 | if (buff[0] != '\0') | 96 | if (buff[0] != '\0') |
97 | badexit("Control warning during warning: %s\naborting...\n", msg); | 97 | badexit("Control warning during warning: %s\naborting...\n", msg); |
98 | if (strcmp(msg + 1, "off") == 0) | 98 | if (strcmp(msg, "@off") == 0) |
99 | onoff = 0; | 99 | onoff = 0; |
100 | else if (strcmp(msg + 1, "on") == 0) | 100 | else if (strcmp(msg, "@on") == 0) |
101 | onoff = 1; | 101 | onoff = 1; |
102 | else if (strcmp(msg + 1, "normal") == 0) | 102 | else if (strcmp(msg, "@normal") == 0) |
103 | mode = 0; | 103 | mode = 0; |
104 | else if (strcmp(msg + 1, "allow") == 0) | 104 | else if (strcmp(msg, "@allow") == 0) |
105 | mode = 1; | 105 | mode = 1; |
106 | else if (strcmp(msg + 1, "store") == 0) | 106 | else if (strcmp(msg, "@store") == 0) |
107 | mode = 2; | 107 | mode = 2; |
108 | else | 108 | else |
109 | badexit("Invalid control warning in test mode: %s\naborting...\n", msg); | 109 | badexit("Invalid control warning in test mode: %s\naborting...\n", msg); |