Increase domain component length limit
[hcoop/zz_old/portal.git] / util.sig
index 46a86b1..5a5697b 100644 (file)
--- a/util.sig
+++ b/util.sig
@@ -15,6 +15,7 @@ sig
     val makeSet : ('a -> string) -> 'a list -> string
     val neg : real -> real
     val add : real * real -> real
+    val mult : int * real -> real
 
     val validHost : string -> bool
     val validDomain : string -> bool
@@ -26,4 +27,6 @@ sig
     val domainDir : string -> string
 
     val readFile : string -> string
+
+    val mem : ''a * ''a list -> bool
 end