staticfactory.mdl

来自「java语言中简单工厂模式的例子」· MDL 代码 · 共 2,327 行 · 第 1/5 页

MDL
2,327
字号
			tool       	"Ada83"
			name       	"AdditionalWiths"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Module-Body"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"Generate"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"FileName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ReturnType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"AdditionalWiths"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"IsSubunit"
			value      	FALSE)))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"SubprogramImplementation"
			value      	("SubprogramImplementationSet" 2))
		    (object Attribute
			tool       	"Ada83"
			name       	"Renames"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ClassParameterMode"
			value      	("ParameterModeSet" 203))
		    (object Attribute
			tool       	"Ada83"
			name       	"Inline"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"EntryCode"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"ExitCode"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialCodeBody"
			value      	"${default}")
		    (object Attribute
			tool       	"Ada83"
			name       	"Representation"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"SubprogramImplementationSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Spec"
				value      	224)
			    (object Attribute
				tool       	"Ada83"
				name       	"Body"
				value      	2)
			    (object Attribute
				tool       	"Ada83"
				name       	"Renaming"
				value      	222)
			    (object Attribute
				tool       	"Ada83"
				name       	"Separate"
				value      	223)))
		    (object Attribute
			tool       	"Ada83"
			name       	"ParameterModeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Default"
				value      	232)
			    (object Attribute
				tool       	"Ada83"
				name       	"In"
				value      	204)
			    (object Attribute
				tool       	"Ada83"
				name       	"Out"
				value      	205)
			    (object Attribute
				tool       	"Ada83"
				name       	"InOut"
				value      	203)
			    (object Attribute
				tool       	"Ada83"
				name       	"FunctionReturn"
				value      	206)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Param"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"Mode"
			value      	("ParameterModeSet" 232))
		    (object Attribute
			tool       	"Ada83"
			name       	"ParameterModeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Default"
				value      	232)
			    (object Attribute
				tool       	"Ada83"
				name       	"In"
				value      	204)
			    (object Attribute
				tool       	"Ada83"
				name       	"Out"
				value      	205)
			    (object Attribute
				tool       	"Ada83"
				name       	"InOut"
				value      	203)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Has"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"NameIfUnlabeled"
			value      	"The_${supplier}")
		    (object Attribute
			tool       	"Ada83"
			name       	"DataMemberName"
			value      	"${relationship}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${relationship}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${relationship}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"IsConstant"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Declare"
			value      	("DeclareSet" 234))
		    (object Attribute
			tool       	"Ada83"
			name       	"Variant"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerGeneric"
			value      	"List")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerDeclarations"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"DeclareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Before"
				value      	233)
			    (object Attribute
				tool       	"Ada83"
				name       	"After"
				value      	234)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"DataMemberName"
			value      	"${attribute}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${attribute}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${attribute}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"IsConstant"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Declare"
			value      	("DeclareSet" 234))
		    (object Attribute
			tool       	"Ada83"
			name       	"Variant"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Representation"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"DeclareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Before"
				value      	233)
			    (object Attribute
				tool       	"Ada83"
				name       	"After"
				value      	234)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Association"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"NameIfUnlabeled"
			value      	"The_${targetClass}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${association}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${association}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"GenerateAssociate"
			value      	("ProcedureKindSet" 202))
		    (object Attribute
			tool       	"Ada83"
			name       	"AssociateName"
			value      	"Associate")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineAssociate"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"GenerateDissociate"
			value      	("ProcedureKindSet" 202))
		    (object Attribute
			tool       	"Ada83"
			name       	"DissociateName"
			value      	"Dissociate")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineDissociate"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"ProcedureKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Procedure"
				value      	202)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))
		    (object Attribute
			tool       	"Ada83"
			name       	"FunctionKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Function"
				value      	199)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"NameIfUnlabeled"
			value      	"The_${targetClass}")
		    (object Attribute
			tool       	"Ada83"
			name       	"DataMemberName"
			value      	"${target}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${target}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${target}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"IsConstant"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Declare"
			value      	("DeclareSet" 234))
		    (object Attribute
			tool       	"Ada83"
			name       	"Representation"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerGeneric"
			value      	"List")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerDeclarations"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ProcedureKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Procedure"
				value      	202)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))
		    (object Attribute
			tool       	"Ada83"
			name       	"DeclareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Before"
				value      	233)
			    (object Attribute
				tool       	"Ada83"
				name       	"After"
				value      	234)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Subsystem"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"Directory"
			value      	"AUTO GENERATE")))
	    (object Attribute
		tool       	"Ada83"
		name       	"HiddenTool"
		v

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?