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

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

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

revision 3641 by jfenwick, Thu Jan 28 02:03:15 2010 UTC revision 3642 by caltinay, Thu Oct 27 03:41:51 2011 UTC
# Line 46  int mm_read_unsymmetric_sparse(const cha Line 46  int mm_read_unsymmetric_sparse(const cha
46    
47      if (mm_read_banner(f, &matcode) != 0)      if (mm_read_banner(f, &matcode) != 0)
48      {      {
49          printf("mm_read_unsymetric: Could not process Matrix Market banner ");          printf("mm_read_unsymmetric_sparse: Could not process Matrix Market banner in file [%s]\n", fname);
         printf(" in file [%s]\n", fname);  
50          return -1;          return -1;
51      }      }
52    
# Line 66  int mm_read_unsymmetric_sparse(const cha Line 65  int mm_read_unsymmetric_sparse(const cha
65    
66      if (mm_read_mtx_crd_size(f, &M, &N, &nz) !=0)      if (mm_read_mtx_crd_size(f, &M, &N, &nz) !=0)
67      {      {
68          fprintf(stderr, "read_unsymmetric_sparse(): could not parse matrix size.\n");          fprintf(stderr, "mm_read_unsymmetric_sparse: Could not parse matrix size.\n");
69          return -1;          return -1;
70      }      }
71    
# Line 74  int mm_read_unsymmetric_sparse(const cha Line 73  int mm_read_unsymmetric_sparse(const cha
73      *N_ = N;      *N_ = N;
74      *nz_ = nz;      *nz_ = nz;
75    
76      /* reseve memory for matrices */      /* reserve memory for matrices */
77    
78      Ip = MEMALLOC(nz, int);      Ip = MEMALLOC(nz, int);
79      Jp = MEMALLOC(nz, int);      Jp = MEMALLOC(nz, int);
# Line 155  int mm_read_banner(FILE *f, MM_typecode Line 154  int mm_read_banner(FILE *f, MM_typecode
154    
155    
156      /* second field describes whether this is a sparse matrix (in coordinate      /* second field describes whether this is a sparse matrix (in coordinate
157              storgae) or a dense array */         storage) or a dense array */
158    
159    
160      if (strcmp(crd, MM_SPARSE_STR) == 0)      if (strcmp(crd, MM_SPARSE_STR) == 0)

Legend:
Removed from v.3641  
changed lines
  Added in v.3642

  ViewVC Help
Powered by ViewVC 1.1.26