open Rep_Core added
git-svn-id: https://projects.brucker.ch/su4sml/svn/su4sml/trunk@7956 3260e6d1-4efc-4170-b0a7-36055960796d
This commit is contained in:
parent
e7f20c0095
commit
d59880b811
|
@ -40,7 +40,6 @@
|
||||||
(* $Id$ *)
|
(* $Id$ *)
|
||||||
signature REP_SECUREUML =
|
signature REP_SECUREUML =
|
||||||
sig
|
sig
|
||||||
|
|
||||||
type Subject
|
type Subject
|
||||||
|
|
||||||
|
|
||||||
|
@ -62,6 +61,10 @@ end
|
||||||
structure Rep_SecureUML : REP_SECUREUML =
|
structure Rep_SecureUML : REP_SECUREUML =
|
||||||
struct
|
struct
|
||||||
|
|
||||||
|
open Rep_Core
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
datatype Subject = User of string
|
datatype Subject = User of string
|
||||||
| Group of Group
|
| Group of Group
|
||||||
withtype Group = string * Subject list
|
withtype Group = string * Subject list
|
||||||
|
|
Loading…
Reference in New Issue