definition module StdDynamicVersion; from StdInt import bitand; //1.3 from StdOverloaded import ==; //3.1 /*2.0 from StdOverloaded import class ==; 0.2*/ :: Version = { major :: !Int , minor :: !Int }; DefaultVersion :: Version; toVersion :: !Int -> Version; fromVersion :: !Version -> Int; getVersionNumber version :== version bitand 0x00ffffff; instance == Version;