bug fixes
This commit is contained in:
parent
de8fb5d489
commit
c6cf0725d0
1 changed files with 17 additions and 17 deletions
|
@ -123,47 +123,47 @@ EM_dopseudo(opcode, args)
|
||||||
case cst_ptyp:
|
case cst_ptyp:
|
||||||
C_hol_cst(args->em_cst,
|
C_hol_cst(args->em_cst,
|
||||||
arg->em_cst,
|
arg->em_cst,
|
||||||
args2->em_cst);
|
(int) (args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case ico_ptyp:
|
case ico_ptyp:
|
||||||
C_hol_icon(args->em_cst,
|
C_hol_icon(args->em_cst,
|
||||||
arg->em_str,
|
arg->em_str,
|
||||||
arg->em_size,
|
arg->em_size,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case uco_ptyp:
|
case uco_ptyp:
|
||||||
C_hol_ucon(args->em_cst,
|
C_hol_ucon(args->em_cst,
|
||||||
arg->em_str,
|
arg->em_str,
|
||||||
arg->em_size,
|
arg->em_size,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case fco_ptyp:
|
case fco_ptyp:
|
||||||
C_hol_fcon(args->em_cst,
|
C_hol_fcon(args->em_cst,
|
||||||
arg->em_str,
|
arg->em_str,
|
||||||
arg->em_size,
|
arg->em_size,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case sof_ptyp:
|
case sof_ptyp:
|
||||||
C_hol_dnam(args->em_cst,
|
C_hol_dnam(args->em_cst,
|
||||||
arg->em_dnam,
|
arg->em_dnam,
|
||||||
arg->em_soff,
|
arg->em_soff,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case nof_ptyp:
|
case nof_ptyp:
|
||||||
C_hol_dlb(args->em_cst,
|
C_hol_dlb(args->em_cst,
|
||||||
arg->em_dlb,
|
arg->em_dlb,
|
||||||
arg->em_noff,
|
arg->em_noff,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case ilb_ptyp:
|
case ilb_ptyp:
|
||||||
C_hol_ilb(args->em_cst,
|
C_hol_ilb(args->em_cst,
|
||||||
arg->em_ilb,
|
arg->em_ilb,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case pro_ptyp:
|
case pro_ptyp:
|
||||||
C_hol_pnam(args->em_cst,
|
C_hol_pnam(args->em_cst,
|
||||||
arg->em_pnam,
|
arg->em_pnam,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
EM_error = "Illegal parameter type";
|
EM_error = "Illegal parameter type";
|
||||||
|
@ -182,47 +182,47 @@ EM_dopseudo(opcode, args)
|
||||||
case cst_ptyp:
|
case cst_ptyp:
|
||||||
C_bss_cst(args->em_cst,
|
C_bss_cst(args->em_cst,
|
||||||
arg->em_cst,
|
arg->em_cst,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case ico_ptyp:
|
case ico_ptyp:
|
||||||
C_bss_icon(args->em_cst,
|
C_bss_icon(args->em_cst,
|
||||||
arg->em_str,
|
arg->em_str,
|
||||||
arg->em_size,
|
arg->em_size,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case uco_ptyp:
|
case uco_ptyp:
|
||||||
C_bss_ucon(args->em_cst,
|
C_bss_ucon(args->em_cst,
|
||||||
arg->em_str,
|
arg->em_str,
|
||||||
arg->em_size,
|
arg->em_size,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case fco_ptyp:
|
case fco_ptyp:
|
||||||
C_bss_fcon(args->em_cst,
|
C_bss_fcon(args->em_cst,
|
||||||
arg->em_str,
|
arg->em_str,
|
||||||
arg->em_size,
|
arg->em_size,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case sof_ptyp:
|
case sof_ptyp:
|
||||||
C_bss_dnam(args->em_cst,
|
C_bss_dnam(args->em_cst,
|
||||||
arg->em_dnam,
|
arg->em_dnam,
|
||||||
arg->em_soff,
|
arg->em_soff,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case nof_ptyp:
|
case nof_ptyp:
|
||||||
C_bss_dlb(args->em_cst,
|
C_bss_dlb(args->em_cst,
|
||||||
arg->em_dlb,
|
arg->em_dlb,
|
||||||
arg->em_noff,
|
arg->em_noff,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case ilb_ptyp:
|
case ilb_ptyp:
|
||||||
C_bss_ilb(args->em_cst,
|
C_bss_ilb(args->em_cst,
|
||||||
arg->em_ilb,
|
arg->em_ilb,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
case pro_ptyp:
|
case pro_ptyp:
|
||||||
C_bss_pnam(args->em_cst,
|
C_bss_pnam(args->em_cst,
|
||||||
arg->em_pnam,
|
arg->em_pnam,
|
||||||
args2->em_cst);
|
(int)(args2->em_cst));
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
EM_error = "Illegal parameter type";
|
EM_error = "Illegal parameter type";
|
||||||
|
@ -407,7 +407,7 @@ EM_dostartmes(args)
|
||||||
}
|
}
|
||||||
arg = c_getarg(args, cst_ptyp);
|
arg = c_getarg(args, cst_ptyp);
|
||||||
arg = c_getarg(arg, 0);
|
arg = c_getarg(arg, 0);
|
||||||
C_mes_begin(args->em_cst);
|
C_mes_begin((int) (args->em_cst));
|
||||||
listtype = ps_mes;
|
listtype = ps_mes;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue