OpenXM_contrib2/asir2000/builtin/array.c - diff

Return to array.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / builtin

version 1.15, 2001/09/07 08:54:57

version 1.16, 2001/09/10 02:45:25

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/builtin/array.c,v 1.14 2001/09/04 05:14:03 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/builtin/array.c,v 1.15 2001/09/07 08:54:57 noro Exp $

#include "ca.h"

#include "base.h"

Line 1303 int md;

ONE_STEP1 ONE_STEP1 ONE_STEP1 ONE_STEP1

}

for ( ; k >= 0; k-- ) {

for ( ; k > 0; k-- ) {

if ( zzz = *s ) { DMAR(zzz,hc,*tj,md,*tj) } tj++; s++;

}

Line 1390 int md;

hc = md-hc;

s = redmat[i]+j;

tj = sp+j;

for ( k = col-j; k >= 0; k-- ) {

for ( k = col-j; k > 0; k-- ) {

if ( zzz = *s ) { DMAR(zzz,hc,*tj,md,*tj) } tj++; s++;

}

Line 1484 int *colstat;

ONE_STEP2 ONE_STEP2 ONE_STEP2 ONE_STEP2

}

for ( ; k >= 0; k -- ) {

for ( ; k > 0; k -- ) {

if ( zzz = *pk ) { DMAR(zzz,a,*tk,md,*tk) } pk++; tk++;

}

Line 1517 int *colstat;

ONE_STEP2 ONE_STEP2 ONE_STEP2 ONE_STEP2

}

for ( ; k >= 0; k -- ) {

for ( ; k > 0; k -- ) {

if ( zzz = *pk ) { DMAR(zzz,a,*tk,md,*tk) } pk++; tk++;

}