summaryrefslogtreecommitdiff
path: root/v4.0/src/MAPPER/GMACHMOD.ASM
blob: a460aab94af44df8201626a2e62966dabcbe37de (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
;0
page 80,132
;
title CP/DOS DOSGETMACHINEMODE mapper
;
dosxxx	segment byte public 'dos'
	assume	cs:dosxxx,ds:nothing,es:nothing,ss:nothing
;
;**********************************************************************
;*
;*   MODULE:   dosgetmachinemode
;*	Note that in PCDOS, this call should NOT BE ISSUED!
;*	This mapper does not return anything, it is meant
;*	only to allow the utility to link without errors.
;*
;*********************************************************************

	    public   dosgetmachinemode
	    .sall
	    .xlist
	    include  macros.inc
	    .list

str	    struc
modeaddr    dw	     ?
str	    ends

dosgetmachinemode proc	far
	Enter	DosGetMachMode	      ; push registers

	sub	ax,ax		      ; set good return code

	mexit			      ; pop registers
	ret	size str - 6	      ; return garbage (Not supported in PCDOS)

dosgetmachinemode endp

dosxxx	    ends

	    end