mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-25 09:24:19 +00:00
11 lines
270 B
Modula-2
11 lines
270 B
Modula-2
|
|
;*****************************************************
|
|
;*
|
|
;* Parse Control Block
|
|
;*
|
|
;*****************************************************
|
|
|
|
pcb_flnmptr equ word ptr 0 ; name ptr
|
|
pcb_fcbptr equ word ptr pcb_flnmptr + word ; fcb ptr
|
|
pcblen equ pcb_fcbptr + word
|