windowing/windowserver/DES/CLIENT.MDL
changeset 0 5d03bc08d59c
child 116 171fae344dd4
equal deleted inserted replaced
-1:000000000000 0:5d03bc08d59c
       
     1 
       
     2 (object Petal
       
     3     version    	35)
       
     4 
       
     5 (object Design "<Top Level>"
       
     6     is_unit    	TRUE
       
     7     file_name  	"c:\wserv\des\client.mdl"
       
     8     is_loaded  	TRUE
       
     9     defaults   	(object defaults
       
    10 	rightMargin 	0.25
       
    11 	leftMargin 	0.25
       
    12 	topMargin  	0.25
       
    13 	bottomMargin 	0.5
       
    14 	pageOverlap 	0.25
       
    15 	clipIconLabels 	TRUE
       
    16 	autoResize 	FALSE
       
    17 	snapToGrid 	TRUE
       
    18 	gridX      	0
       
    19 	gridY      	0
       
    20 	defaultFont 	(object Font
       
    21 	    size       	10
       
    22 	    face       	"Arial"
       
    23 	    bold       	FALSE
       
    24 	    italics    	FALSE
       
    25 	    underline  	FALSE
       
    26 	    strike     	FALSE
       
    27 	    color      	0
       
    28 	    default_color 	TRUE)
       
    29 	showMessageNum 	3)
       
    30     root_category 	(object Class_Category "<Top Level>"
       
    31 	exportControl 	"Public"
       
    32 	global     	TRUE
       
    33 	subsystem  	"<Top Level>"
       
    34 	logical_models 	(list unit_reference_list
       
    35 	    (object Class "Thread"
       
    36 		fields     	(list has_relationship_list
       
    37 		    (object Has_Relationship
       
    38 			supplier   	"Thread")
       
    39 		    (object Has_Relationship
       
    40 			supplier   	"Window"
       
    41 			supplier_cardinality 	(value cardinality "n")
       
    42 			client_cardinality 	(value cardinality "1"))
       
    43 		    (object Has_Relationship
       
    44 			supplier   	"Pen"
       
    45 			supplier_cardinality 	(value cardinality "n")
       
    46 			client_cardinality 	(value cardinality "1"))
       
    47 		    (object Has_Relationship
       
    48 			supplier   	"Clock"
       
    49 			supplier_cardinality 	(value cardinality "n")
       
    50 			client_cardinality 	(value cardinality "1"))
       
    51 		    (object Has_Relationship
       
    52 			supplier   	"Sprite"
       
    53 			supplier_cardinality 	(value cardinality "n")
       
    54 			client_cardinality 	(value cardinality "1"))
       
    55 		    (object Has_Relationship
       
    56 			supplier   	"Bitmap sequence"
       
    57 			supplier_cardinality 	(value cardinality "n"))
       
    58 		    (object Has_Relationship
       
    59 			supplier   	"Text cursor"
       
    60 			supplier_cardinality 	(value cardinality "0..1")
       
    61 			client_cardinality 	(value cardinality "1"))
       
    62 		    (object Has_Relationship
       
    63 			supplier   	"Font"
       
    64 			supplier_cardinality 	(value cardinality "n")
       
    65 			client_cardinality 	(value cardinality "1"))
       
    66 		    (object Has_Relationship
       
    67 			supplier   	"Palette"
       
    68 			supplier_cardinality 	(value cardinality "n")
       
    69 			client_cardinality 	(value cardinality "1"))
       
    70 		    (object Has_Relationship
       
    71 			supplier   	"Brush"
       
    72 			supplier_cardinality 	(value cardinality "n")
       
    73 			client_cardinality 	(value cardinality "1"))
       
    74 		    (object Has_Relationship
       
    75 			supplier   	"Bitmap"
       
    76 			supplier_cardinality 	(value cardinality "n")
       
    77 			client_cardinality 	(value cardinality "1"))
       
    78 		    (object Has_Relationship
       
    79 			supplier   	"GC"
       
    80 			supplier_cardinality 	(value cardinality "n")
       
    81 			client_cardinality 	(value cardinality "1"))
       
    82 		    (object Has_Relationship
       
    83 			supplier   	"Clipping region"
       
    84 			supplier_cardinality 	(value cardinality "n")
       
    85 			client_cardinality 	(value cardinality "1"))
       
    86 		    (object Has_Relationship
       
    87 			supplier   	"Session"
       
    88 			supplier_cardinality 	(value cardinality "1")
       
    89 			client_cardinality 	(value cardinality "1"))))
       
    90 	    (object Class "Connection")
       
    91 	    (object Class "Drawable")
       
    92 	    (object Class "Window"
       
    93 		superclasses 	(list inheritance_relationship_list
       
    94 		    (object Inheritance_Relationship
       
    95 			supplier   	"Drawable")))
       
    96 	    (object Class "Bitmap"
       
    97 		superclasses 	(list inheritance_relationship_list
       
    98 		    (object Inheritance_Relationship
       
    99 			supplier   	"Drawable")))
       
   100 	    (object Class "Backed up window"
       
   101 		superclasses 	(list inheritance_relationship_list
       
   102 		    (object Inheritance_Relationship
       
   103 			supplier   	"Window")))
       
   104 	    (object Class "GDI Object")
       
   105 	    (object Class "AGDI Object"
       
   106 		used_nodes 	(list uses_relationship_list
       
   107 		    (object Uses_Relationship
       
   108 			supplier   	"Window")))
       
   109 	    (object Class "Brush"
       
   110 		superclasses 	(list inheritance_relationship_list
       
   111 		    (object Inheritance_Relationship
       
   112 			supplier   	"GDI Object"))
       
   113 		used_nodes 	(list uses_relationship_list
       
   114 		    (object Uses_Relationship
       
   115 			supplier   	"Bitmap")))
       
   116 	    (object Class "Font"
       
   117 		superclasses 	(list inheritance_relationship_list
       
   118 		    (object Inheritance_Relationship
       
   119 			supplier   	"GDI Object")))
       
   120 	    (object Class "Palette"
       
   121 		superclasses 	(list inheritance_relationship_list
       
   122 		    (object Inheritance_Relationship
       
   123 			supplier   	"GDI Object")))
       
   124 	    (object Class "Pen"
       
   125 		superclasses 	(list inheritance_relationship_list
       
   126 		    (object Inheritance_Relationship
       
   127 			supplier   	"GDI Object")))
       
   128 	    (object Class "Clock"
       
   129 		superclasses 	(list inheritance_relationship_list
       
   130 		    (object Inheritance_Relationship
       
   131 			supplier   	"AGDI Object")))
       
   132 	    (object Class "Sprite"
       
   133 		superclasses 	(list inheritance_relationship_list
       
   134 		    (object Inheritance_Relationship
       
   135 			supplier   	"AGDI Object")))
       
   136 	    (object Class "Bitmap sequence"
       
   137 		superclasses 	(list inheritance_relationship_list
       
   138 		    (object Inheritance_Relationship
       
   139 			supplier   	"AGDI Object")))
       
   140 	    (object Class "Text cursor"
       
   141 		superclasses 	(list inheritance_relationship_list
       
   142 		    (object Inheritance_Relationship
       
   143 			supplier   	"AGDI Object")))
       
   144 	    (object Class "GC"
       
   145 		used_nodes 	(list uses_relationship_list
       
   146 		    (object Uses_Relationship
       
   147 			supplier   	"Drawable")
       
   148 		    (object Uses_Relationship
       
   149 			supplier   	"Brush")
       
   150 		    (object Uses_Relationship
       
   151 			supplier   	"Palette")
       
   152 		    (object Uses_Relationship
       
   153 			supplier   	"Font")
       
   154 		    (object Uses_Relationship
       
   155 			supplier   	"Pen")
       
   156 		    (object Uses_Relationship
       
   157 			supplier   	"Clipping region")))
       
   158 	    (object Class "Clipping region"
       
   159 		superclasses 	(list inheritance_relationship_list
       
   160 		    (object Inheritance_Relationship
       
   161 			supplier   	"GDI Object")))
       
   162 	    (object Class "Pointer Cursor"
       
   163 		superclasses 	(list inheritance_relationship_list
       
   164 		    (object Inheritance_Relationship
       
   165 			supplier   	"AGDI Object")))
       
   166 	    (object Class "Session"
       
   167 		fields     	(list has_relationship_list
       
   168 		    (object Has_Relationship
       
   169 			supplier   	"GDI Object"
       
   170 			supplier_cardinality 	(value cardinality "n")
       
   171 			client_cardinality 	(value cardinality "1"))
       
   172 		    (object Has_Relationship
       
   173 			supplier   	"Drawable"
       
   174 			supplier_cardinality 	(value cardinality "n")
       
   175 			client_cardinality 	(value cardinality "1"))
       
   176 		    (object Has_Relationship
       
   177 			supplier   	"Store")
       
   178 		    (object Has_Relationship
       
   179 			supplier   	"AGDI Object"
       
   180 			supplier_cardinality 	(value cardinality "n")
       
   181 			client_cardinality 	(value cardinality "1"))))
       
   182 	    (object Class "Store"))
       
   183 	logical_presentations 	(list unit_reference_list
       
   184 	    (object ClassDiagram "Main"
       
   185 		title      	"Main"
       
   186 		zoom       	80
       
   187 		max_height 	28350
       
   188 		max_width  	21600
       
   189 		origin_x   	0
       
   190 		origin_y   	0
       
   191 		items      	(list diagram_item_list
       
   192 		    (object ClassView "Class" "Thread" @1
       
   193 			location   	(1982, 181)
       
   194 			label      	(object ItemLabel
       
   195 			    location   	(1878, 97)
       
   196 			    nlines     	2
       
   197 			    max_width  	240
       
   198 			    justify    	0
       
   199 			    label      	"Thread")
       
   200 			annotation 	8)
       
   201 		    (object ClassView "Class" "Drawable" @2
       
   202 			location   	(1927, 1363)
       
   203 			label      	(object ItemLabel
       
   204 			    location   	(1823, 1279)
       
   205 			    nlines     	2
       
   206 			    max_width  	240
       
   207 			    justify    	0
       
   208 			    label      	"Drawable")
       
   209 			annotation 	8)
       
   210 		    (object ClassView "Class" "Window" @3
       
   211 			location   	(2103, 1695)
       
   212 			label      	(object ItemLabel
       
   213 			    location   	(1999, 1611)
       
   214 			    nlines     	2
       
   215 			    max_width  	240
       
   216 			    justify    	0
       
   217 			    label      	"Window")
       
   218 			annotation 	8)
       
   219 		    (object ClassView "Class" "Bitmap" @4
       
   220 			location   	(1701, 1720)
       
   221 			label      	(object ItemLabel
       
   222 			    location   	(1597, 1636)
       
   223 			    nlines     	2
       
   224 			    max_width  	240
       
   225 			    justify    	0
       
   226 			    label      	"Bitmap")
       
   227 			annotation 	8)
       
   228 		    (object InheritView ""
       
   229 			client     	@3
       
   230 			supplier   	@2)
       
   231 		    (object InheritView ""
       
   232 			client     	@4
       
   233 			supplier   	@2)
       
   234 		    (object ClassView "Class" "Backed up window" @5
       
   235 			location   	(2286, 2005)
       
   236 			label      	(object ItemLabel
       
   237 			    location   	(2182, 1921)
       
   238 			    nlines     	2
       
   239 			    max_width  	240
       
   240 			    justify    	0
       
   241 			    label      	"Backed up window")
       
   242 			annotation 	8)
       
   243 		    (object InheritView ""
       
   244 			client     	@5
       
   245 			supplier   	@3)
       
   246 		    (object ClassView "Class" "GDI Object" @6
       
   247 			location   	(958, 646)
       
   248 			label      	(object ItemLabel
       
   249 			    location   	(854, 562)
       
   250 			    nlines     	2
       
   251 			    max_width  	240
       
   252 			    justify    	0
       
   253 			    label      	"GDI Object")
       
   254 			annotation 	8)
       
   255 		    (object ClassView "Class" "AGDI Object" @7
       
   256 			location   	(2496, 1463)
       
   257 			label      	(object ItemLabel
       
   258 			    location   	(2392, 1380)
       
   259 			    nlines     	2
       
   260 			    max_width  	240
       
   261 			    justify    	0
       
   262 			    label      	"AGDI Object")
       
   263 			height     	250
       
   264 			annotation 	8)
       
   265 		    (object ClassView "Class" "Brush" @8
       
   266 			location   	(1666, 1102)
       
   267 			label      	(object ItemLabel
       
   268 			    location   	(1562, 1018)
       
   269 			    nlines     	2
       
   270 			    max_width  	240
       
   271 			    justify    	0
       
   272 			    label      	"Brush")
       
   273 			annotation 	8)
       
   274 		    (object ClassView "Class" "Font" @9
       
   275 			location   	(178, 1103)
       
   276 			label      	(object ItemLabel
       
   277 			    location   	(74, 1019)
       
   278 			    nlines     	2
       
   279 			    max_width  	240
       
   280 			    justify    	0
       
   281 			    label      	"Font")
       
   282 			annotation 	8)
       
   283 		    (object ClassView "Class" "Palette" @10
       
   284 			location   	(542, 1110)
       
   285 			label      	(object ItemLabel
       
   286 			    location   	(438, 1026)
       
   287 			    nlines     	2
       
   288 			    max_width  	240
       
   289 			    justify    	0
       
   290 			    label      	"Palette")
       
   291 			annotation 	8)
       
   292 		    (object ClassView "Class" "Pen" @11
       
   293 			location   	(1284, 1110)
       
   294 			label      	(object ItemLabel
       
   295 			    location   	(1180, 1026)
       
   296 			    nlines     	2
       
   297 			    max_width  	240
       
   298 			    justify    	0
       
   299 			    label      	"Pen")
       
   300 			annotation 	8)
       
   301 		    (object ClassView "Class" "Clock" @12
       
   302 			location   	(3130, 2150)
       
   303 			label      	(object ItemLabel
       
   304 			    location   	(3026, 2066)
       
   305 			    nlines     	2
       
   306 			    max_width  	240
       
   307 			    justify    	0
       
   308 			    label      	"Clock")
       
   309 			annotation 	8)
       
   310 		    (object ClassView "Class" "Sprite" @13
       
   311 			location   	(3458, 1937)
       
   312 			label      	(object ItemLabel
       
   313 			    location   	(3354, 1853)
       
   314 			    nlines     	2
       
   315 			    max_width  	240
       
   316 			    justify    	0
       
   317 			    label      	"Sprite")
       
   318 			annotation 	8)
       
   319 		    (object ClassView "Class" "Bitmap sequence" @14
       
   320 			location   	(3431, 1626)
       
   321 			label      	(object ItemLabel
       
   322 			    location   	(3327, 1542)
       
   323 			    nlines     	2
       
   324 			    max_width  	240
       
   325 			    justify    	0
       
   326 			    label      	"Bitmap sequence")
       
   327 			annotation 	8)
       
   328 		    (object InheritView ""
       
   329 			client     	@8
       
   330 			supplier   	@6)
       
   331 		    (object InheritView ""
       
   332 			client     	@10
       
   333 			supplier   	@6)
       
   334 		    (object InheritView ""
       
   335 			client     	@9
       
   336 			supplier   	@6)
       
   337 		    (object InheritView ""
       
   338 			client     	@11
       
   339 			supplier   	@6)
       
   340 		    (object ClassView "Class" "Text cursor" @15
       
   341 			location   	(3407, 1293)
       
   342 			label      	(object ItemLabel
       
   343 			    location   	(3303, 1209)
       
   344 			    nlines     	2
       
   345 			    max_width  	240
       
   346 			    justify    	0
       
   347 			    label      	"Text cursor")
       
   348 			annotation 	8)
       
   349 		    (object InheritView ""
       
   350 			client     	@12
       
   351 			supplier   	@7)
       
   352 		    (object InheritView ""
       
   353 			client     	@14
       
   354 			supplier   	@7)
       
   355 		    (object InheritView ""
       
   356 			client     	@15
       
   357 			supplier   	@7)
       
   358 		    (object InheritView ""
       
   359 			client     	@13
       
   360 			supplier   	@7)
       
   361 		    (object ClassView "Class" "GC" @16
       
   362 			location   	(964, 1635)
       
   363 			label      	(object ItemLabel
       
   364 			    location   	(860, 1551)
       
   365 			    nlines     	2
       
   366 			    max_width  	240
       
   367 			    justify    	0
       
   368 			    label      	"GC")
       
   369 			annotation 	8)
       
   370 		    (object ClassView "Class" "Clipping region" @17
       
   371 			location   	(928, 1108)
       
   372 			label      	(object ItemLabel
       
   373 			    location   	(824, 1024)
       
   374 			    nlines     	2
       
   375 			    max_width  	240
       
   376 			    justify    	0
       
   377 			    label      	"Clipping region")
       
   378 			annotation 	8)
       
   379 		    (object InheritView ""
       
   380 			client     	@17
       
   381 			supplier   	@6)
       
   382 		    (object UsesView ""
       
   383 			client     	@7
       
   384 			supplier   	@3)
       
   385 		    (object UsesView ""
       
   386 			client     	@16
       
   387 			supplier   	@2)
       
   388 		    (object UsesView ""
       
   389 			client     	@16
       
   390 			supplier   	@8)
       
   391 		    (object UsesView ""
       
   392 			client     	@16
       
   393 			supplier   	@10)
       
   394 		    (object UsesView ""
       
   395 			client     	@16
       
   396 			supplier   	@9)
       
   397 		    (object UsesView ""
       
   398 			client     	@16
       
   399 			supplier   	@11)
       
   400 		    (object UsesView ""
       
   401 			client     	@16
       
   402 			supplier   	@17)
       
   403 		    (object ClassView "Class" "Pointer Cursor" @18
       
   404 			location   	(2700, 2245)
       
   405 			label      	(object ItemLabel
       
   406 			    location   	(2596, 2161)
       
   407 			    nlines     	2
       
   408 			    max_width  	240
       
   409 			    justify    	0
       
   410 			    label      	"Pointer Cursor")
       
   411 			annotation 	8)
       
   412 		    (object InheritView ""
       
   413 			client     	@18
       
   414 			supplier   	@7)
       
   415 		    (object ClassView "Class" "Session" @19
       
   416 			location   	(2314, 562)
       
   417 			label      	(object ItemLabel
       
   418 			    location   	(2210, 478)
       
   419 			    nlines     	2
       
   420 			    max_width  	240
       
   421 			    justify    	0
       
   422 			    label      	"Session")
       
   423 			annotation 	8)
       
   424 		    (object HasView ""
       
   425 			client     	@1
       
   426 			supplier   	@19)
       
   427 		    (object ClassView "Class" "Store" @20
       
   428 			location   	(2775, 707)
       
   429 			label      	(object ItemLabel
       
   430 			    location   	(2671, 623)
       
   431 			    nlines     	2
       
   432 			    max_width  	240
       
   433 			    justify    	0
       
   434 			    label      	"Store")
       
   435 			annotation 	8)
       
   436 		    (object UsesView ""
       
   437 			client     	@8
       
   438 			supplier   	@4)
       
   439 		    (object HasView ""
       
   440 			client     	@19
       
   441 			supplier   	@6)
       
   442 		    (object HasView ""
       
   443 			client     	@19
       
   444 			supplier   	@20)
       
   445 		    (object HasView ""
       
   446 			client     	@19
       
   447 			supplier   	@7)
       
   448 		    (object HasView ""
       
   449 			client     	@19
       
   450 			supplier   	@2)))))
       
   451     root_subsystem 	(object SubSystem "<Top Level>"
       
   452 	physical_models 	(list unit_reference_list)
       
   453 	physical_presentations 	(list unit_reference_list
       
   454 	    (object Module_Diagram "Main"
       
   455 		title      	"Main"
       
   456 		zoom       	100
       
   457 		max_height 	28350
       
   458 		max_width  	21600
       
   459 		origin_x   	0
       
   460 		origin_y   	0
       
   461 		items      	(list diagram_item_list))))
       
   462     process_structure 	(object Processes
       
   463 	ProcsNDevs 	(list
       
   464 	    (object Process_Diagram ""
       
   465 		title      	""
       
   466 		zoom       	100
       
   467 		max_height 	28350
       
   468 		max_width  	21600
       
   469 		origin_x   	0
       
   470 		origin_y   	0
       
   471 		items      	(list diagram_item_list))))
       
   472     properties 	(object Properties))