psprocdef(definition * defp)
{
int split_flag = defp->pc.split_flag;
+ int multi_flag = defp->pc.multi_flag;
- if (split_flag) {
+ if (split_flag || multi_flag) {
psproc1(defp, 1, "int", "Start",
(1 << DEF_INPARAM) | (1 << DEF_INOUTPARAM));
psproc1(defp, 1, "int", "End",
scan4(TOK_SPLIT, TOK_MULTI, TOK_EQUAL, TOK_SEMICOLON, &tok);
if (tok.kind == TOK_MULTI) {
proc_multi = 1;
+ defp->pc.multi_flag = 1;
scan2(TOK_EQUAL, TOK_SEMICOLON, &tok);
+ } else {
+ defp->pc.multi_flag = 0;
}
if (tok.kind == TOK_SPLIT) {
proc_split = 1;