已经包含了 setjmp.h 但仍然报错 :jmp_buf is used as a type,but is not defined as a type [ 本帖最后由 uestcdezhi 于 2009-3-12 13:11 编辑 ]
PGM (&INPUT &REMAINDER) /* SEARCH */ DCL &INPUT *CHAR LEN(50) DCL &REMAINDER *CHAR LEN(50) DCL &X *DEC LEN(2 0) VALUE(03) DCL &L *DEC LEN(2 0) /* REMAINING LENGTH */ SCAN: IF (%SST(&INPUT &X 1) *EQ '.') THEN(DO) CHGVAR VAR(&L) VALUE(50-&X) CHGVAR VAR(&X) VALUE(&X+1) CHGVAR VAR(&REM...
PGM (&INPUT &REMAINDER) /* SEARCH */ DCL &INPUT *CHAR LEN(50) DCL &REMAINDER *CHAR LEN(50) DCL &X *DEC LEN(2 0) VALUE(03) DCL &L *DEC LEN(2 0) /* REMAINING LENGTH */ SCAN: IF (%SST(&INPUT &X 1) *EQ '.') THEN(DO) CHGVAR VAR(&L) VALUE(50-&X) CHGVAR VAR(&X) VALUE(&X+1) CHGVAR VAR(&REM...