*** ffi.c.~1~	Wed Dec 13 10:01:54 2000
--- ffi.c	Wed Feb  7 12:46:10 2001
***************
*** 81,88 ****
              "static void primControl Args((int));\n"
              "static void primControl(what)\n"
!             "int what; {\n"
!             "    switch (what) {\n"
!             "        case %d:\n", RESET
!             );
      for(xs=es; nonNull(xs); xs=tl(xs)) {
          Name n       = hd(xs);
--- 81,93 ----
              "static void primControl Args((int));\n"
              "static void primControl(what)\n"
!             "int what; {\n");
! 
!     if (nonNull(es)) {
!       fprintf(out,
! 	      "    switch (what) {\n"
!               "        case %d:\n", RESET
! 	      );
!     }
! 
      for(xs=es; nonNull(xs); xs=tl(xs)) {
          Name n       = hd(xs);
***************
*** 97,104 ****
          }
      }
!     fprintf(out,
!             "    }\n"
!             "}\n"
!             );
  
      /* Boilerplate initialization function */
--- 102,109 ----
          }
      }
!     if (nonNull(es)) {
!       fprintf(out,"    }\n");
!     }
!     fprintf(out, "}\n");
  
      /* Boilerplate initialization function */