1(*
2 * Copyright 2014, General Dynamics C4 Systems
3 *
4 * This software may be distributed and modified according to the terms of
5 * the GNU General Public License version 2. Note that NO WARRANTY is provided.
6 * See "LICENSE_GPLv2.txt" for details.
7 *
8 * @TAG(GD_GPL)
9 *)
10
11(*
12   Types visible in the API.
13*)
14
15chapter "Types visible in the API"
16
17theory Types_H
18imports
19  "./$L4V_ARCH/State_H"
20  "Lib.Lib"
21  "./$L4V_ARCH/ArchTypes_H"
22begin
23
24context begin interpretation Arch .
25requalify_types
26  object_type
27  machine_word
28  paddr
29  vptr
30
31requalify_consts
32  getObjectSize
33  fromAPIType
34  toAPIType
35  isFrameType
36  pageType
37  ptrFromPAddr
38end
39
40#INCLUDE_HASKELL SEL4/API/Types.lhs all_bits NOT wordsFromBootInfo messageInfoFromWord wordFromMessageInfo ObjectType getObjectSize fromAPIType toAPIType isFrameType pageType
41#INCLUDE_HASKELL SEL4/API/Types.lhs all_bits ONLY wordsFromBootInfo messageInfoFromWord wordFromMessageInfo
42
43end
44