|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1408 (0x580)
Types: TextFile
Names: »LNKINIT.BAK«
└─⟦3d1e6965e⟧ Bits:30009789/_.ft.Ibm2.50007347.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »LNKINIT.BAK«
└─⟦91467e717⟧ Bits:30009789/_.ft.Ibm2.50007348.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »LNKINIT.BAK«
└─⟦d36b687c5⟧ Bits:30009789/_.ft.Ibm2.50007363.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »LNKINIT.BAK«
(******************************************************************************)
(* *)
(* Copyright (1985) by Metanic Aps., Denmark *)
(* *)
(* Author: Lars Gregers Jakobsen. *)
(* *)
(******************************************************************************)
(*
SEGMENT InitTerm;
This Prospero Pascal segment holds the declarations for the init
and term procedures for the Metanic Linker.
*)
(* $I B:lnkDC0.pas Declarations of global constants, types, and commons *)
PROCEDURE Init(VAR Status: StatusType
);
BEGIN (*INIT*)
Optiontable.LogFileKind := None;
OptionTable.TargetFileKind := Implicit;
CurFileNo := 0;
CurModuleNo := 0;
SCTOffset := 0;
CurSegmentCount := 0;
CurValueNo := 0;
CurExternalImportSymbolNo := 0;
Status := Success
END; (*INIT*)
PROCEDURE Term(VAR Status: StatusType
);
BEGIN (*TERM*)
END; (*TERM*)
(* BEGIN (*INITTERM*)
(* END. (*INITTERM*)
«eof»