rewrite generation to rws
[mTask.git] / Shares / mTaskShare.dcl
index a9c6f39..6b39448 100644 (file)
@@ -3,9 +3,9 @@ definition module Shares.mTaskShare
 import iTasks
 
 :: MTaskShare = {
-               initValue :: Int,
                withTask :: String,
                identifier :: Int,
+               initVal :: String,
                realShare :: String
        }