--- stack/stack.c	2002/02/02 19:30:07	1.24
+++ stack/stack.c	2002/02/02 20:06:11	1.25
@@ -64,7 +64,7 @@
   out_hash= out_hash%HASHTBLSIZE;
   position= &(in_hashtbl[out_hash]);
 
-  while(position != NULL){
+  while(1){
     if(*position==NULL)		/* If empty */
       return position;
     
@@ -73,8 +73,6 @@
 
     position= &((*position)->next); /* Try next */
   }
-  return NULL;			/* end of list reached without finding
-                                   an empty position */
 }
 
 /* Generic push function. */
@@ -218,6 +216,7 @@
     printf("\"%s\"", (char*)temp->content.ptr);
     break;
   case symbol:
+  case func:
     printf("%s", temp->id);
     break;
   default: