diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use z for initialisation

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-11-05 15:04:12 +00:00
parent 036876299f
commit b1ccb2e3ec
4 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
BEAM/eamamasm.c
View File

@ -540,7 +540,7 @@ void eam_pass(CInstr *ppc)
emit_inst(_exit_eam); emit_inst(_exit_eam);
break; break;
case mark_initialised_pvars_op: case mark_initialized_pvars_op:
break; break;
case fetch_args_for_bccall: case fetch_args_for_bccall:
case bccall_op: case bccall_op:

2
C/absmi.c
View File

@ -1713,7 +1713,7 @@ Yap_absmi(int inp)
#if PUSH_REGS #if PUSH_REGS
old_regs = &Yap_REGS; old_regs = &Yap_REGS;
/* done, let us now initialise this space */ /* done, let us now initialize this space */
init_absmi_regs(&absmi_regs); init_absmi_regs(&absmi_regs);
/* the registers are all set up, let's swap */ /* the registers are all set up, let's swap */

2
C/absmi_insts.h
View File

@ -11,7 +11,7 @@
BOp(Ystop, l); BOp(Ystop, l);
SET_ASP(YREG, E_CB*sizeof(CELL)); SET_ASP(YREG, E_CB*sizeof(CELL));
/* make sure ASP is initialised */ /* make sure ASP is initialized */
saveregs(); saveregs();
#if PUSH_REGS #if PUSH_REGS

4
C/absmi_insts.i
View File

@ -10,7 +10,7 @@
BOp(Ystop, l); BOp(Ystop, l);
SET_ASP(YREG, E_CB*sizeof(CELL)); SET_ASP(YREG, E_CB*sizeof(CELL));
/* make sure ASP is initialised */ /* make sure ASP is initialized */
saveregs(); saveregs();
#if PUSH_REGS #if PUSH_REGS
@ -5422,7 +5422,7 @@
XREG(PREG->y_u.yx.x) = (CELL) pt0; XREG(PREG->y_u.yx.x) = (CELL) pt0;
PREG = NEXTOP(PREG, yx); PREG = NEXTOP(PREG, yx);
#if defined(YAPOR_SBA) && defined(FROZEN_STACKS) #if defined(YAPOR_SBA) && defined(FROZEN_STACKS)
/* We must initialise a shared variable to point to the SBA */ /* We must initialize a shared variable to point to the SBA */
if (Unsigned((Int)(pt0)-(Int)(H_FZ)) > if (Unsigned((Int)(pt0)-(Int)(H_FZ)) >
Unsigned((Int)(B_FZ)-(Int)(H_FZ))) { Unsigned((Int)(B_FZ)-(Int)(H_FZ))) {
*pt0 = (CELL)STACK_TO_SBA(pt0); *pt0 = (CELL)STACK_TO_SBA(pt0);