add part 2 of the WEGA kernel
This commit is contained in:
parent
aaeed59cca
commit
2a90de4371
|
|
@ -0,0 +1,68 @@
|
|||
!******************************************************************************
|
||||
*******************************************************************************
|
||||
|
||||
W E G A - Quelle (C) ZFT/KEAW Abt. Basissoftware - 1988
|
||||
|
||||
KERN 3.2 Modul: mt.d.s
|
||||
|
||||
Bearbeiter: P. Hoge
|
||||
Datum: 29.7.88
|
||||
Version: 1.1
|
||||
|
||||
*******************************************************************************
|
||||
|
||||
dummy Magnetband-Treiber
|
||||
|
||||
zur Erfuellung der Referenzen im Kern, wenn kein mt.c vorhanden.
|
||||
Der dummy Treiber wurde extra in Assembler geschrieben, um
|
||||
kuerzesten Code zu sichern.
|
||||
|
||||
Einbinden in LIB2:
|
||||
as -u -o mt.o mt.d.s
|
||||
ar r LIB2 mt.o
|
||||
rm mt.o
|
||||
(cp LIB2 /usr/sys/dev/LIB2)
|
||||
|
||||
*******************************************************************************
|
||||
******************************************************************************!
|
||||
|
||||
|
||||
|
||||
mt_s module
|
||||
|
||||
$segmented
|
||||
|
||||
global
|
||||
|
||||
_mtint procedure
|
||||
entry
|
||||
jp _unexint
|
||||
end _mtint
|
||||
|
||||
_mtopen procedure
|
||||
entry
|
||||
end _mtopen
|
||||
|
||||
_mtclose procedure
|
||||
entry
|
||||
end _mtclose
|
||||
|
||||
_mtstrat procedure
|
||||
entry
|
||||
end _mtstrat
|
||||
|
||||
_mtread procedure
|
||||
entry
|
||||
end _mtread
|
||||
|
||||
_mtwrite procedure
|
||||
entry
|
||||
end _mtwrite
|
||||
|
||||
_mtioctl procedure
|
||||
entry
|
||||
ldb _u+%15, #19 !u.u_error = ENODEV!
|
||||
ret
|
||||
end _mtioctl
|
||||
|
||||
end mt_s
|
||||
Loading…
Reference in New Issue