/[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.1.1 by adcroft, Fri Sep 20 19:47:31 2002 UTC revision 1.3 by cnh, Thu Jan 17 21:05:34 2008 UTC
# Line 1  Line 1 
1  /* $Id$ */  /* $Id$ */
2  #include <stdio.h>  #include <stdio.h>
3    #include <stdlib.h>
4  #include <string.h>  #include <string.h>
5  #include "GLOBALS.h"  #include "GLOBALS.h"
6  #include "DD.h"  #include "DD.h"
# Line 53  ddRecord *rec; Line 54  ddRecord *rec;
54    
55    /* Now set values that are not NULL */    /* Now set values that are not NULL */
56    dd[ddCurrent].name = strdup(rec->name);    dd[ddCurrent].name = strdup(rec->name);
57    
58      /* CNH Debug starts */
59      printf("ddAdd name=\"%s\", rec. no. = %d\n",rec->name,ddKey+1);
60    
61      /* CNH Debug ends   */
62    
63    
64    if ( dd[ddCurrent].name == NULL ) return((ddRecord *)NULL);    if ( dd[ddCurrent].name == NULL ) return((ddRecord *)NULL);
65    dd[ddCurrent].id   = ddKey+1;    dd[ddCurrent].id   = ddKey+1;
66    dd[ddCurrent].key  = strdup(ddkey(ddKey+1));    dd[ddCurrent].key  = strdup(ddkey(ddKey+1));
Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22