/[escript]/trunk/paso/src/Pattern.c
ViewVC logotype

Diff of /trunk/paso/src/Pattern.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1901 by artak, Fri Oct 17 00:55:59 2008 UTC revision 1902 by artak, Wed Oct 22 03:54:14 2008 UTC
# Line 188  Paso_Pattern* Paso_Pattern_multiply(int Line 188  Paso_Pattern* Paso_Pattern_multiply(int
188        j = A->index[iptrA];        j = A->index[iptrA];
189        for(iptrB = B->ptr[j]; iptrB < B->ptr[j+1]; ++iptrB) {        for(iptrB = B->ptr[j]; iptrB < B->ptr[j+1]; ++iptrB) {
190          k = B->index[iptrB];          k = B->index[iptrB];
191          if(i==k) {          Finley_IndexList_insertIndex(&(index_list[i]),k);
           Finley_IndexList_insertIndex(&(index_list[i]),k);  
           break;  
         }  
192       }       }
193      }      }
194    }    }
# Line 240  Paso_Pattern* Paso_Pattern_binop(int typ Line 237  Paso_Pattern* Paso_Pattern_binop(int typ
237          }          }
238        }        }
239    }    }
240    for(i = 0; i < A->numOutput; i++){    for(i = 0; i < B->numOutput; i++){
241      iptrA = A->ptr[i],      iptrA = A->ptr[i],
242      iptrB = B->ptr[i];      iptrB = B->ptr[i];
243            

Legend:
Removed from v.1901  
changed lines
  Added in v.1902

  ViewVC Help
Powered by ViewVC 1.1.26