version 1.11, 2025/04/02 03:02:42
|
version 1.12, 2025/04/09 19:52:02
|
Line 24
|
Line 24
|
* along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
* along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
* |
* |
* $Log$ |
* $Log$ |
|
* Revision 1.12 2025/04/09 19:52:02 snw |
|
* Eliminate as many warnings as possible while building with -Wall |
|
* |
* Revision 1.11 2025/04/02 03:02:42 snw |
* Revision 1.11 2025/04/02 03:02:42 snw |
* Stop requiring users to pass -e to fmadm when -u or -g are passed |
* Stop requiring users to pass -e to fmadm when -u or -g are passed |
* |
* |
Line 904 set0:
|
Line 907 set0:
|
|
|
if (isalpha (vn[0]) && *(codptr + 1) == ':') { |
if (isalpha (vn[0]) && *(codptr + 1) == ':') { |
char sc_string[255]; |
char sc_string[255]; |
register int sci; |
|
|
|
codptr += 2; |
codptr += 2; |
expr (NAME); |
expr (NAME); |
|
|
Line 1037 set2:
|
Line 1039 set2:
|
|
|
if (new_and_set == TRUE) new_and_set = FALSE; |
if (new_and_set == TRUE) new_and_set = FALSE; |
if (new_object == TRUE) new_object = FALSE; |
if (new_object == TRUE) new_object = FALSE; |
|
/* |
set1: |
set1: |
|
*/ |
if (*codptr != ',') break; |
if (*codptr != ',') break; |
|
|
if (*++codptr == '@') goto again; |
if (*++codptr == '@') goto again; |
Line 4005 off3:
|
Line 4009 off3:
|
goto set2; |
goto set2; |
} |
} |
|
|
|
/* |
post_new: |
post_new: |
|
*/ |
ch = nstx; |
ch = nstx; |
|
|
while (nestc[ch] == FOR) ch--; /* FOR does not define a NEW level */ |
while (nestc[ch] == FOR) ch--; /* FOR does not define a NEW level */ |
Line 5679 zgo:
|
Line 5684 zgo:
|
} |
} |
|
|
case ZWRITE: |
case ZWRITE: |
|
|
|
|
zwrite: |
|
{ |
{ |
short k; |
short k; |
char w_tmp[512]; |
char w_tmp[512]; |
Line 7453 void rbuf_dump(void)
|
Line 7455 void rbuf_dump(void)
|
|
|
for (i = 0; i < NO_OF_RBUF; i++) { |
for (i = 0; i < NO_OF_RBUF; i++) { |
|
|
sprintf (flgs, ""); |
flgs[0] = '\0'; |
|
|
if (ages[i] == 0) { |
if (ages[i] == 0) { |
sprintf (rnam, "---------"); |
sprintf (rnam, "---------"); |