[BACK]Return to mumps.c CVS log [TXT] [DIR] Up to [Coherent Logic Development] / freem / src

Diff for /freem/src/mumps.c between versions 1.12 and 1.14

version 1.12, 2025/04/02 02:16:27 version 1.14, 2025/04/02 04:50:49
Line 24 Line 24
  *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.   *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
  *   *
  *   $Log$   *   $Log$
    *   Revision 1.14  2025/04/02 04:50:49  snw
    *   Allow vendor routines to be upgraded
    *
    *   Revision 1.13  2025/04/02 03:26:22  snw
    *   Don't corrupt the terminal if FreeM runs before fmadm configure has been run
    *
  *   Revision 1.12  2025/04/02 02:16:27  snw   *   Revision 1.12  2025/04/02 02:16:27  snw
  *   Add fmadm status environment command and move journals to a better location   *   Add fmadm status environment command and move journals to a better location
  *   *
Line 112  int main (int argc, char **argv, char ** Line 118  int main (int argc, char **argv, char **
           
     int option_index = 0;      int option_index = 0;
   
       char fm_initialized = FALSE;
       
     char dx_mcode[512];      char dx_mcode[512];
     char startup_routine[256];      char startup_routine[256];
     short routine_mode;      short routine_mode;
Line 642  int main (int argc, char **argv, char ** Line 650  int main (int argc, char **argv, char **
         strncpy (nsnbuf, nsname, 255);              strncpy (nsnbuf, nsname, 255);    
         if (init (nsnbuf) == FALSE) {          if (init (nsnbuf) == FALSE) {
                           
             set_io (UNIX);              if (fm_initialized) set_io (UNIX);
             fprintf (stderr, "\nError initializing FreeM.\n");              fprintf (stderr, "\nError initializing FreeM.\n");
                           
             exit (1);                          exit (1);            
                           
         }                  }
           else {
               fm_initialized = TRUE;
           }
   
                   
         direct_mode = FALSE;          direct_mode = FALSE;
Line 674  int main (int argc, char **argv, char ** Line 685  int main (int argc, char **argv, char **
             /* isolate the path from the routine file */              /* isolate the path from the routine file */
             strncpy (cli_rtn_path, argv[optind], strrchr (argv[optind], '/') - argv[optind]);                    strncpy (cli_rtn_path, argv[optind], strrchr (argv[optind], '/') - argv[optind]);      
                           
 /*          set_io (UNIX);  
             printf ("cli_rtn_name = '%s' cli_rtn_path = '%s'\n", cli_rtn_name, cli_rtn_path);  
             set_io (MUMPS);  
 */            
         }          }
   
         /* do we have a file extension? */          /* do we have a file extension? */
Line 714  int main (int argc, char **argv, char ** Line 721  int main (int argc, char **argv, char **
   
     }      }
   
       
     if (!file_exists (config_file)) {      if (!file_exists (config_file)) {
   
         set_io (UNIX);          if (fm_initialized == TRUE) set_io (UNIX);
           
         fprintf (stderr, "\nFreeM has not been configured. Please run 'fmadm configure'.\n\n\n\n");          fprintf (stderr, "\nFreeM has not been configured. Please run 'fmadm configure'.\n\n\n\n");
                   
         exit (2);          exit (2);
Line 727  int main (int argc, char **argv, char ** Line 735  int main (int argc, char **argv, char **
     if (!skip_init) {      if (!skip_init) {
         /* initialize FreeM environment */          /* initialize FreeM environment */
         strncpy (nsnbuf, nsname, 255);              strncpy (nsnbuf, nsname, 255);    
         if (init (nsnbuf) == FALSE) {          if (init (nsnbuf) == FALSE) {       
               
             set_io (UNIX);              set_io (UNIX);
             fprintf (stderr, "\nError initializing FreeM.\n");              fprintf (stderr, "\nError initializing FreeM.\n");
   
             exit (1);              exit (1);
   
         }          }
           else {
               fm_initialized = TRUE;
           }
     }      }
   
     if (first_process == TRUE) {      if (first_process == TRUE) {
Removed from v.1.12  
changed lines
  Added in v.1.14

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>