42 lines
1.0 KiB
C
42 lines
1.0 KiB
C
|
/****************************************************************
|
||
|
|
* *
|
||
|
|
* Copyright 2001, 2004 Sanchez Computer Associates, Inc. *
|
||
|
|
* *
|
||
|
|
* This source code contains the intellectual property *
|
||
|
|
* of its copyright holder(s), and is made available *
|
||
|
|
* under a license. If you do not know the terms of *
|
||
|
|
* the license, please stop and do not read further. *
|
||
|
|
* *
|
||
|
|
****************************************************************/
|
||
|
|
|
||
|
|
#include "mdef.h"
|
||
|
|
#include "cmidef.h"
|
||
|
|
#include "hashtab_mname.h" /* needed for cmmdef.h */
|
||
|
|
#include "cmmdef.h"
|
||
|
|
#include "gvcmz.h"
|
||
|
|
#include "cmi.h"
|
||
|
|
|
||
|
|
GBLREF unsigned char lkerror;
|
||
|
|
GBLREF struct CLB *lkerrlnk;
|
||
|
|
GBLDEF unsigned short lksusp_sent;
|
||
|
|
GBLDEF unsigned short lksusp_rec;
|
||
|
|
|
||
|
|
void gvcmz_lksuspend_ast(struct CLB *lnk)
|
||
|
|
{
|
||
|
|
lksusp_rec++;
|
||
|
|
if (CMI_CLB_ERROR(lnk))
|
||
|
|
{
|
||
|
|
((link_info *)(lnk->usr))->neterr = TRUE;
|
||
|
|
lkerror = CMMS_L_LKSUSPEND;
|
||
|
|
lkerrlnk = lnk;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
if (*lnk->mbf != CMMS_M_LKSUSPENDED)
|
||
|
|
{
|
||
|
|
lkerror = CMMS_L_LKSUSPEND;
|
||
|
|
lkerrlnk = lnk;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
lnk->ast = 0;
|
||
|
|
}
|