summaryrefslogtreecommitdiff
path: root/reference/C/CONTRIB/SNIP/biport.c
blob: 1b1e6bbac13721d5fd003023b466541f15ebcb6c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
/*
**  BIPORT.C - Port TC/TC++/BC++ code using register pseudovariables
**
**  public domain by Bob Stout
*/

#include "biport.h"

union  REGS  BIP_regs_;
struct SREGS BIP_sregs_;

unsigned _pascal geninterrupt(int int_no)
{
      int86x(int_no, &BIP_regs_, &BIP_regs_, &BIP_sregs_);
      return BIP_regs_.x.ax;
}