]> wirehaze git hosting - MS-DOS.git/blob - v4.0/src/MAPPER/D_GCTRCD.ASM

wirehaze git hosting

MZ is back!
[MS-DOS.git] / v4.0 / src / MAPPER / D_GCTRCD.ASM
1 ; SCCSID = @(#)d_gctrcd.asm 1.1 86/06/03
2 .xlist
3 ; include struc.inc
4 include nlsapi.inc
5 .list
6
7 DGROUP group _DATA
8
9 _TEXT segment word public 'CODE'
10 _TEXT ends
11
12 _DATA segment word public 'DATA'
13 EXTRN _ApiSel:WORD
14 _DATA ends
15
16 _TEXT segment
17
18 EXTRN W_NLS_APIS:near
19
20 public DOSGETCTRYINFO
21 DOSGETCTRYINFO proc far
22 assume cs:_TEXT
23
24
25 mov AX,BP ; Add 4 bytes of dummy parameters to the
26 mov BP,SP ; Stack by copying the return address down 4
27 push [BP+2]
28 push [BP]
29 mov BP,AX
30
31 push DS
32 mov AX,_DATA
33 mov DS,AX
34 mov AX, SETFILELIST
35 mov DS:_ApiSel,AX
36 pop DS
37
38 jmp W_NLS_APIS
39
40 ; pop bp
41 ; ret 14
42
43 DOSGETCTRYINFO endp
44
45 _TEXT ENDS
46 END
47 \1a