separated Kernel, Files. Texts modules for bootstrapping and general use

Former-commit-id: e1f76da278
This commit is contained in:
Norayr Chilingarian 2014-03-21 04:00:44 +08:00
parent 5d683e6727
commit 66c583b70e
41 changed files with 3229 additions and 327 deletions

View file

@ -2,7 +2,7 @@
Refer to the "General ETH Oberon System Source License" contract available at: http://www.oberon.ethz.ch/ *)
MODULE ethBTrees; (** portable *) (* ejz, *)
IMPORT Files := OakFiles;
IMPORT Files;
(** BTrees is a utility module that manages b-trees with string (64 characters) or longint keys. Each key is linked to
a longint value (org) which normaly is an offset to where the data for that key is stored. *)

View file

@ -8,7 +8,7 @@ MODULE ethGZReaders; (** Stefan Walthert **)
**)
IMPORT
Files := OakFiles, ZlibReaders := ethZlibReaders;
Files, ZlibReaders := ethZlibReaders;
CONST

View file

@ -4,7 +4,7 @@ Refer to the "General ETH Oberon System Source License" contract available at: h
MODULE ethGZWriters; (** Stefan Walthert **)
IMPORT
Files := OakFiles, ZlibWriters := ethZlibWriters;
Files, ZlibWriters := ethZlibWriters;
CONST
(** result codes **)

View file

@ -3,7 +3,7 @@ Refer to the "General ETH Oberon System Source License" contract available at: h
MODULE ethSets; (** portable *)
IMPORT Texts := CmdlnTexts;
IMPORT Texts;
CONST size* = SIZE(LONGINT)* 8(*32*);

View file

@ -4,7 +4,7 @@ Refer to the "General ETH Oberon System Source License" contract available at: h
MODULE ethZip; (** Stefan Walthert **)
IMPORT
Files := OakFiles, Zlib := ethZlib, ZlibReaders := ethZlibReaders, ZlibWriters := ethZlibWriters;
Files, Zlib := ethZlib, ZlibReaders := ethZlibReaders, ZlibWriters := ethZlibWriters;
CONST

View file

@ -4,7 +4,7 @@ Refer to the "General ETH Oberon System Source License" contract available at: h
MODULE ethZlibReaders; (** Stefan Walthert **)
IMPORT
Files := OakFiles, Zlib := ethZlib, ZlibBuffers := ethZlibBuffers, ZlibInflate := ethZlibInflate;
Files, Zlib := ethZlib, ZlibBuffers := ethZlibBuffers, ZlibInflate := ethZlibInflate;
CONST
(** result codes **)

View file

@ -4,7 +4,7 @@ Refer to the "General ETH Oberon System Source License" contract available at: h
MODULE ethZlibWriters; (** Stefan Walthert **)
IMPORT
Files := OakFiles, Zlib := ethZlib, ZlibBuffers := ethZlibBuffers, ZlibDeflate := ethZlibDeflate;
Files, Zlib := ethZlib, ZlibBuffers := ethZlibBuffers, ZlibDeflate := ethZlibDeflate;
CONST
(** result codes **)