/[MITgcm]/mitgcm.org/devel/buildweb/code-browser/F90Mapper/dd.c
ViewVC logotype

Diff of /mitgcm.org/devel/buildweb/code-browser/F90Mapper/dd.c

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

revision 1.1 by adcroft, Fri Sep 20 19:47:31 2002 UTC revision 1.2 by edhill, Wed Jul 23 17:54:35 2003 UTC
# Line 53  ddRecord *rec; Line 53  ddRecord *rec;
53    
54    /* Now set values that are not NULL */    /* Now set values that are not NULL */
55    dd[ddCurrent].name = strdup(rec->name);    dd[ddCurrent].name = strdup(rec->name);
56    
57      /* CNH Debug starts */
58      printf("ddAdd name=\"%s\", rec. no. = %d\n",rec->name,ddKey+1);
59    
60      /* CNH Debug ends   */
61    
62    
63    if ( dd[ddCurrent].name == NULL ) return((ddRecord *)NULL);    if ( dd[ddCurrent].name == NULL ) return((ddRecord *)NULL);
64    dd[ddCurrent].id   = ddKey+1;    dd[ddCurrent].id   = ddKey+1;
65    dd[ddCurrent].key  = strdup(ddkey(ddKey+1));    dd[ddCurrent].key  = strdup(ddkey(ddKey+1));
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22