From albertel@msu.edu Tue May 16 19:01:45 2000
Date: Tue, 16 May 2000 12:20:13 -0400 (EDT)
From: Guy Albertelli II <albertel@msu.edu>
To: hutch@PSFC.MIT.EDU
Subject: Re: Renaming
Resent-Date: Tue, 16 May 2000 12:20:15 -0400
Resent-From: hutch@PSFC.MIT.EDU
Resent-To: HUTCH@SILAS.PSFC.MIT.EDU

Hi Ian,

> Therefore it seems likely that you are right that it is the perl
> interaction somehow. My tests don't do restarts, of course.

It is the restart code. Kinda. Plus I forgot to mention a couple of
other namespace issues. Otherwise evrything looks good to go.

--- /home/albertel/tth/orig/tthdynamic-5/tthfunc.c	Sat May 13 17:52:53 2000
+++ tthfunc.c	Tue May 16 12:14:26 2000
@@ -22500,7 +22500,7 @@
 
  /********************************** CODE ******************************/
 
-int dummy(argc,argv)
+static int dummy(argc,argv)
 int argc;
 char *argv[];
 {
@@ -22848,6 +22848,7 @@
   if((*nkeys) > 0){
     (*nkeys)--;
     free(keys[*nkeys]); 
+    keys[*nkeys]=0;
   } else {
     add_error("**** Error: No keys left to remove\n");
   }
@@ -23224,7 +23225,7 @@
   float yellow;
   float black;
 } ;
-struct tth_ct colortable[N_COLORS] ={
+struct tth_ct tth_colortable[N_COLORS] ={
  {"black",0,0,0,1},
  {"white",0,0,0,0},
  {"red",0,1.,1.,0},
@@ -23308,15 +23309,15 @@
 char *ch;
 float *c,*m,*y,*k;
 {
-extern struct tth_ct colortable[N_COLORS];
+extern struct tth_ct tth_colortable[N_COLORS];
 int i;
   i=0;
   for(i=0;i<N_COLORS;i++){
-    if(!strcmp(colortable[i].name,ch)){
-      *c=colortable[i].cyan;
-      *m=colortable[i].magenta;
-      *y=colortable[i].yellow;
-      *k=colortable[i].black;
+    if(!strcmp(tth_colortable[i].name,ch)){
+      *c=tth_colortable[i].cyan;
+      *m=tth_colortable[i].magenta;
+      *y=tth_colortable[i].yellow;
+      *k=tth_colortable[i].black;
       return 4;
     }
   }


-- 
albertel@msu.edu           BubbleWrap(R) is a registered trademark
Guy Albertelli -8-7-9-         of the Sealed Air Corporation
    I would love to but . . . I'm building a pig from a kit. 
