design: generate new GenInvocationLabels type
This commit is contained in:
parent
3a6ce53def
commit
700dab41aa
|
@ -23,7 +23,7 @@ text \<open>
|
|||
An enumeration of all system call labels.
|
||||
\<close>
|
||||
|
||||
#INCLUDE_HASKELL SEL4/API/InvocationLabels.lhs ArchLabels= ONLY InvocationLabel
|
||||
#INCLUDE_HASKELL SEL4/API/InvocationLabels.lhs ArchLabels= ONLY GenInvocationLabels InvocationLabel
|
||||
#INCLUDE_HASKELL SEL4/API/InvocationLabels.lhs instanceproofs
|
||||
|
||||
end
|
||||
|
|
|
@ -18,8 +18,8 @@ requalify_types (in Arch)
|
|||
copy_register_sets irqcontrol_invocation
|
||||
invocation
|
||||
|
||||
#INCLUDE_HASKELL SEL4/API/Invocation.lhs Arch=Arch NOT InvocationLabel
|
||||
#INCLUDE_HASKELL SEL4/API/InvocationLabels.lhs ONLY invocationType
|
||||
#INCLUDE_HASKELL SEL4/API/Invocation.lhs Arch=Arch NOT GenInvocationLabels InvocationLabel
|
||||
#INCLUDE_HASKELL SEL4/API/InvocationLabels.lhs ONLY invocationType genInvocationType
|
||||
|
||||
context Arch begin
|
||||
context begin global_naming global
|
||||
|
|
Loading…
Reference in New Issue