home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / CPROG / CTASK22.ZIP / TSKPRTI.ASM < prev    next >
Assembly Source File  |  1990-10-12  |  900b  |  57 lines

  1. ;
  2. ;    --- Version 2.2 90-10-12 10:45 ---
  3. ;
  4. ;    CTask - Printer interrupt handler (IBM specific)
  5. ;
  6. ;    Public Domain Software written by
  7. ;        Thomas Wagner
  8. ;        Ferrari electronic Gmbh
  9. ;        Beusselstrasse 27
  10. ;        D-1000 Berlin 21
  11. ;        Germany
  12. ;
  13. ;    This file is new with version 1.2.
  14. ;
  15. ;    To avoid stack overflows while processing printer interrupts in
  16. ;    the tskprt module, all printer interrupts are routed through the
  17. ;    "envelope" routines defined here.
  18. ;
  19.     name    tskprti
  20. ;
  21.     include    tsk.mac
  22. ;
  23.     .tsk_model
  24. ;
  25.     public    tskprt_int0
  26.     public    tskprt_int1
  27.     public    tskprt_int2
  28. ;
  29.         Locext    tsk_switch_stack
  30.     Locext    tsk_prt_int
  31. ;
  32. prtint    macro    num
  33. ;
  34. tskprt_int&num    proc    far
  35.         call    tsk_switch_stack
  36.     callp    tsk_prt_int,<num>
  37.         cli
  38.     mov    al,20h
  39.     out    20h,al
  40.     iret
  41. ;
  42. tskprt_int&num    endp
  43. ;
  44.     endm
  45. ;
  46. ;
  47.     .tsk_code
  48. ;
  49.     prtint    0
  50.     prtint    1
  51.     prtint    2
  52. ;
  53.     .tsk_ecode
  54.     end
  55.  
  56.  
  57.