v4.0/src/MAPPER/GMACHMOD.ASM

   1 ;\ f\e0
   2 page 80,132
   3 ;
   4 title CP/DOS DOSGETMACHINEMODE mapper
   5 ;
   6 dosxxx  segment byte public 'dos'
   7         assume  cs:dosxxx,ds:nothing,es:nothing,ss:nothing
   8 ;
   9 ;**********************************************************************
  10 ;*
  11 ;*   MODULE:   dosgetmachinemode
  12 ;*      Note that in PCDOS, this call should NOT BE ISSUED!
  13 ;*      This mapper does not return anything, it is meant
  14 ;*      only to allow the utility to link without errors.
  15 ;*
  16 ;*********************************************************************
  17
  18             public   dosgetmachinemode
  19             .sall
  20             .xlist
  21             include  macros.inc
  22             .list
  23
  24 str         struc
  25 modeaddr    dw       ?
  26 str         ends
  27
  28 dosgetmachinemode proc  far
  29         Enter   DosGetMachMode        ; push registers
  30
  31         sub     ax,ax                 ; set good return code
  32
  33         mexit                         ; pop registers
  34         ret     size str - 6          ; return garbage (Not supported in PCDOS)
  35
  36 dosgetmachinemode endp
  37
  38 dosxxx      ends
  39
  40             end