HOL-OCL
/
su4sml
1
0
Fork 0
Code Issues Pull Requests Releases Activity

removed permission names from ProtectedAction datatype 

git-svn-id: https://projects.brucker.ch/su4sml/svn/infsec-import/trunk/src/su4sml@3240 3260e6d1-4efc-4170-b0a7-36055960796d
This commit is contained in:
Jürgen Doser 2005-10-20 15:50:05 +00:00
parent 7cedb2def8
commit 103ed6b315
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/rep_secureuml.sml
View File

@ -29,11 +29,11 @@ datatype Resource = Entity of Rep_OclType.Path
datatype ActionName = Create | Read | Update | Delete | FullAccess | Execute
datatype ProtectedAction = SimpleAction of ActionName * Resource * string list
| CompositeAction of ActionName * Resource * string list
datatype ProtectedAction = SimpleAction of ActionName * Resource
| CompositeAction of ActionName * Resource
fun subordinated_actions (SimpleAction _) = nil
| subordinated_actions (CompositeAction (Read,Entity c,p)) = nil
| subordinated_actions (CompositeAction (Read,Entity c)) = nil
(* let val read_attributes = ...
val read_methods = ...
in