IFND SYSLOG_I
SYSLOG_I        equ     1

**
**      $Filename: syslog.i $
**      $Revision: 1.3 $
**      $Date: 1993/09/18 16:30:26 $
**
**      Debugging log daemon -- public definitions
**
**      © Copyright 1993 Peter Simons, Germany
**        All Rights Reserved
**
**      $Id: syslog.i,v 1.3 1993/09/18 16:30:26 simons Stab simons $
**


                XREF    @initsyslog
                XREF    @uninitsyslog
                XREF    _syslog0

_InitSysLog     EQU     @initsyslog
_UnInitSysLog   EQU     @uninitsyslog
_SysLog         EQU     _syslog0

        IFND DEBUG
DEBUG           set     1
        ENDC

        IFND NO_MULTITASKING
NO_MULTITASKING set     1
        ENDC


SYSLOG          MACRO
  IFNE NARG
    IFNE DEBUG
                movem.l d0-d1/a0-a1/a6,-(SP)
      IFNE NARG-1
argnum          set     NARG-1
        REPEAT NARG-1
                STACKIT \2,\3,\4,\5,\6,\7,\8,\9
        ENDR
      ENDC
                pea     (.STRING\@,PC)
      IFNE NO_MULTITASKING
                move.l  ($4).w,a6
                jsr     (_LVOForbid,a6)
      ENDC
                jsr     (_SysLog)
      IFNE NO_MULTITASKING
                move.l  ($4).w,a6
                jsr     (_LVOPermit,a6)
      ENDC
                add.w   #NARG*4,SP
                movem.l (SP)+,d0-d1/a0-a1/a6
                bra     .GoOn\@
.STRING\@       CSTR    \1,$0A
                EVEN
.GoOn\@
    ENDC  ; DEBUG
  ENDC  ; NARG
                ENDM

        IFND STACKIT
STACKIT         MACRO
                PUSH    \(argnum)
argnum          set     argnum-1
                ENDM
        ENDC    ; STACKIT


        ENDC    ; SYSLOG_I