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

Diff for /freem/src/global_bltin.c between versions 1.3 and 1.25

version 1.3, 2025/03/09 15:20:18 version 1.25, 2025/05/02 16:30:16
Line 1 Line 1
 /*  /*
  *                            *   *   $Id$
  *                           * *  
  *                          *   *  
  *                     ***************  
  *                      * *       * *  
  *                       *  MUMPS  *  
  *                      * *       * *  
  *                     ***************  
  *                          *   *  
  *                           * *  
  *                            *  
  *  
  *   global.c  
  *    freem database engine   *    freem database engine
  *   *
  *     *  
  *   Author: Serena Willis <snw@coherent-logic.com>   *   Author: Serena Willis <snw@coherent-logic.com>
  *    Copyright (C) 1998 MUG Deutschland   *    Copyright (C) 1998 MUG Deutschland
  *    Copyright (C) 2020 Coherent Logic Development LLC   *    Copyright (C) 2020, 2025 Coherent Logic Development LLC
  *   *
  *   *
  *   This file is part of FreeM.   *   This file is part of FreeM.
Line 35 Line 23
  *   You should have received a copy of the GNU Affero Public License   *   You should have received a copy of the GNU Affero Public License
  *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.   *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
  *   *
    *   $Log$
    *   Revision 1.25  2025/05/02 16:30:16  snw
    *   Fix broken build due to time issues
    *
    *   Revision 1.24  2025/04/28 14:52:54  snw
    *   Temporarily revert global handler refactor and fix reference regression in xecline
    *
    *   Revision 1.7  2025/03/24 04:13:11  snw
    *   Replace action macro dat with fra_dat to avoid symbol conflict on OS/2
    *
    *   Revision 1.6  2025/03/24 01:33:30  snw
    *   Guard declaration of time function in global_bltin.c for portability
    *
    *   Revision 1.5  2025/03/22 22:52:24  snw
    *   Add STRLEN_GBL macro to manage global string length
    *
    *   Revision 1.4  2025/03/09 19:14:25  snw
    *   First phase of REUSE compliance and header reformat
    *
    *
    * SPDX-FileCopyrightText:  (C) 2025 Coherent Logic Development LLC
    * SPDX-License-Identifier: AGPL-3.0-or-later
  **/   **/
   
 #include <sys/types.h>  #include <sys/types.h>
Line 42 Line 52
 #include <fcntl.h>  #include <fcntl.h>
 #include <unistd.h>  #include <unistd.h>
 #include <string.h>  #include <string.h>
   #if defined(USE_SYS_TIME_H) && !defined(MSDOS) && !defined(__osf__)
   # include <sys/time.h>
   #else
   # include <time.h> 
   #endif
   
 #include <errno.h>  #include <errno.h>
   
Line 100  static void panic (void); Line 115  static void panic (void);
 #define BOTTOM   6  #define BOTTOM   6
 #define DATA     8  #define DATA     8
   
 #if !defined(__OpenBSD__) && !defined(_AIX) && !defined(__osf__) && !defined(MSDOS) && !defined(__vax__)  #if !defined(__OpenBSD__) && !defined(_AIX) && !defined(__osf__) && !defined(MSDOS) && !defined(__vax__) && !defined(__OS2__) && !defined(__linux__)
  long time ();   long time ();
 #endif  #endif
   
Line 689  reopen: Line 704  reopen:
                 return;                  return;
             }              }
   
             if (action == dat || action == zdata) {              if (action == fra_dat || action == zdata) {
                 data[0] = '0';                  data[0] = '0';
                 data[1] = EOL1;                  data[1] = EOL1;
                   
Line 1255  s20: Line 1270  s20:
             break;              break;
   
   
         case dat:          case fra_dat:
   
             data[0] = '0';              data[0] = '0';
             data[1] = EOL1;              data[1] = EOL1;
Line 1611  s20: Line 1626  s20:
                         }                          }
   
                         zref[j++] = ch0;                          zref[j++] = ch0;
   
                                                   
                         if (j >= 252) {                          if (j >= 252) {
                             zref[j] = EOL;                              zref[j] = EOL;
Removed from v.1.3  
changed lines
  Added in v.1.25

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