1 CREATE  Db Header and Db Primal  ... 
2  NEW DB [ 3] Created.
3
4VORTEX INPUT PARAMETERS::
5 	MESSAGE       FileName:	 smred.msg            
6	OUTPUT        FileName:	 smred.out            
7	DISK CACHE    FileName:	 NULL                 
8	PART DB       FileName:	 parts.db             
9	DRAW DB       FileName:	 draw.db              
10	PERSON DB     FileName:	 emp.db               
11	PERSONS Data  FileName:	 ./input/persons.250  
12	PARTS         Count   :	 100     
13	OUTER         Loops   :	 1       
14	INNER         Loops   :	 1       
15	LOOKUP        Parts   :	 25      
16	DELETE        Parts   :	 10      
17	STUFF         Parts   :	 10      
18	DEPTH         Traverse:	 5       
19	% DECREASE    Parts   :	 0       
20	% INCREASE    LookUps :	 0       
21	% INCREASE    Deletes :	 0       
22	% INCREASE    Stuffs  :	 0       
23	FREEZE_PACKETS        :	 1       
24	ALLOC_CHUNKS          :	 10000   
25	EXTEND_CHUNKS         :	 5000    
26	DELETE Draw objects   :	 True                 
27	DELETE Part objects   :	 False                
28	QUE_BUG               :	 1000
29	VOID_BOUNDARY         :	 67108864
30	VOID_RESERVE          :	 1048576
31
32	COMMIT_DBS            :	 False
33
34
35
36 BMT TEST :: files...
37      EdbName           := PartLib
38      EdbFileName       := parts.db
39      DrwName           := DrawLib
40      DrwFileName       := draw.db
41      EmpName           := PersonLib
42      EmpFileName       := emp.db
43
44      Swap to DiskCache := False
45      Freeze the cache  := True
46
47
48 BMT TEST :: parms...
49      DeBug modulo      := 1000    
50      Create Parts count:= 100     
51      Outer Loops       := 1       
52      Inner Loops       := 1       
53      Look Ups          := 25      
54      Delete Parts      := 10      
55      Stuff Parts       := 10      
56      Traverse Limit    := 5       
57      Delete Draws      := True
58      Delete Parts      := False
59      Delete ALL Parts  := after every <mod  0>Outer Loop
60
61 INITIALIZE LIBRARY ::
62
63 INITIALIZE SCHEMA ::
64  Primal_CreateDb Accessed !!!
65 CREATE  Db Header and Db Primal  ... 
66  NEW DB [ 4] Created.
67   PartLibCreate:: Db[  4]; VpartsDir=   1
68
69 Part Count=       1
70
71 Initialize the Class maps
72 LIST HEADS  loaded ... DbListHead_Class = 207
73                        DbListNode_Class = 206
74
75...NOTE... ShellLoadCode:: Class[ 228] will NOT be Activated.
76
77
78...NOTE... ShellLoadCode:: Class[ 229] will NOT be Activated.
79
80  Primal_CreateDb Accessed !!!
81 CREATE  Db Header and Db Primal  ... 
82  NEW DB [ 5] Created.
83   DrawLibCreate:: Db[  5]; VpartsDir=   1
84
85 Initialize the Class maps of this schema.
86  Primal_CreateDb Accessed !!!
87 CREATE  Db Header and Db Primal  ... 
88  NEW DB [ 6] Created.
89
90 ***NOTE***  Persons Library Extended!
91
92 Create <131072> Persons.
93 ItNum      0. Person[  6:       5]. Name= Riddell         , Robert V.       ;
94
95 LAST Person Read::
96 ItNum    250. Person[  6:     503]. Name= Gonzales        , Warren X.       ;
97
98 BUILD <Query0>   for <Part2>  class::
99
100  if (link[1].length >=    5) ::
101
102 Build Query2 for <Address>   class::
103
104  if (State == CA || State == T*)
105
106 Build Query1 for <Person>    class::
107
108  if (LastName  >= H* && LastName <= P* && Query0(Residence)) ::
109
110 BUILD <Query3> for <DrawObj>    class::
111
112  if (Id  >= 3000 
113  &&  (Id >= 3000 && Id <= 3001)
114  &&  Id >= 3002)
115
116 BUILD <Query4> for <NamedDrawObj>   class::
117
118  if (Nam ==       Pre*
119  || (Nam ==   ??Mid???  || == Pre??Mid??   || ==     ??Post
120       || ==  Pre??Post  || == ??Mid???Post   || == Pre??Mid???Post)
121  && Id <= 7)
122      SEED          :=    1008; Swap     = False; RgnEntries =   135
123
124 OUTER LOOP [  1] :  NewParts = 100 LookUps = 25 StuffParts = 10.
125
126 Create 100 New Parts
127 Create Part      1. Token[  4:       2].
128
129  <   100> Parts Created. CurrentId=   100
130
131 Connect each instantiated Part TO 3 unique Parts
132 Connect Part      1. Token[  4:       2]
133   Connect  Part     25. Token[  4:      26] FromList=    26.
134   Connect  Part     12. Token[  4:      13] FromList=    13.
135   Connect  Part     59. Token[  4:      60] FromList=    60.
136
137 SET  <DrawObjs>    entries::
138      1. [  5:       5]  := <1       >; @[:     6]
139   Iteration count =   100
140
141 SET  <NamedDrawObjs>  entries::
142      1. [  5:      39]  := <14      >;
143   Iteration count =    12
144
145 SET  <LibRectangles>  entries::
146      1. [  5:      23]  := <8       >; @[:    24]
147   Iteration count =    12
148
149 LIST <DbRectangles>   entries::
150       1. [   5:    23]
151   Iteration count =    12
152
153 SET  <PersonNames  >  entries::
154   Iteration count =   250
155
156 COMMIT All Image copies:: Release=<True>; Max Parts= 100
157 <   100> Part            images'  Committed.
158                 <     0> are Named.
159 <    50> Point           images'  Committed.
160 <    81> Person          images'  Committed.
161
162 COMMIT Parts(*      100)
163
164 Commit TestObj_Class        in <Primal> DB.
165 ItNum      0. Token[  0:       0]. TestObj        Committed.
166 <     0> TestObj         images'  Committed.
167
168 Commit CartesianPoint_Class in <Primal> DB.
169 ItNum      0. Token[  0:       0]. CartesianPoint Committed.
170 <     0> CartesianPoint  images'  Committed.
171
172 BEGIN  Inner Loop Sequence::.
173
174 INNER LOOP [   1:   1] :
175
176 LOOK UP     25 Random Parts and Export each Part.
177
178 LookUp for     26 parts; Asserts =     8
179       <Part2    >  Asserts =     2; NULL Asserts =     3.
180       <DrawObj  >  Asserts =     0; NULL Asserts =     5.
181       <NamedObj >  Asserts =     0; NULL Asserts =     0.
182       <Person   >  Asserts =     0; NULL Asserts =     5.
183       <TestObj  >  Asserts =    60; NULL Asserts =     0.
184
185 DELETE      10 Random Parts.
186
187   PartDelete    :: Token[  4:      91].
188   PartDisconnect:: Token[  4:      91] id:=     90 for each link.
189   DisConnect  link    [   0]:=     50; PartToken[    51:    51].
190   DisConnect  link    [   1]:=     17; PartToken[    18:    18].
191   DisConnect  link    [   2]:=     72; PartToken[    73:    73].
192   DeleteFromList:: Vchunk[ 4:      91]. (*   1)
193   DisConnect  FromList[   0]:=    56;  Token[    57:    57].
194   Vlists[  89] :=   100;
195
196 Delete for     11 parts;
197
198 Traverse Count=     0
199
200 TRAVERSE PartId[     6] and all Connections to  5 Levels
201 SEED In Traverse Part [  4:      65] @ Level =  4.
202
203 Traverse Count=   357
204       Traverse    Asserts =     5. True Tests =     1
205 <     5> DrawObj         objects  DELETED.
206                 <     2> are Named.
207 <     2> Point           objects  DELETED.
208
209 CREATE 10 Additional Parts
210
211 Create 10 New Parts
212 Create Part    101. Token[  4:     102].
213
214  <    10> Parts Created. CurrentId=   110
215
216 Connect each instantiated Part TO 3 unique Parts
217
218 COMMIT All Image copies:: Release=<True>; Max Parts= 110
219 <    81> Part            images'  Committed.
220                 <     0> are Named.
221 <    38> Point           images'  Committed.
222 <    31> Person          images'  Committed.
223
224 COMMIT Parts(*      100)
225
226 Commit TestObj_Class        in <Primal> DB.
227 ItNum      0. Token[  3:       4]. TestObj        Committed.
228 <    15> TestObj         images'  Committed.
229
230 Commit CartesianPoint_Class in <Primal> DB.
231 ItNum      0. Token[  3:       3]. CartesianPoint Committed.
232 <    16> CartesianPoint  images'  Committed.
233
234 DELETE All TestObj objects;
235
236 Delete TestObj_Class        in <Primal> DB.
237 ItNum      0. Token[  3:       4]. TestObj        Deleted.
238 <    15> TestObj         objects  Deleted.
239
240 Commit CartesianPoint_Class in <Primal> DB.
241 ItNum      0. Token[  3:       3]. CartesianPoint Deleted.
242 <    16> CartesianPoint  objects  Deleted.
243
244 DELETE TestObj and Point objects... 
245
246 END INNER LOOP [   1:   1].
247
248 DELETE All TestObj objects;
249
250 Delete TestObj_Class        in <Primal> DB.
251 <     0> TestObj         objects  Deleted.
252
253 Commit CartesianPoint_Class in <Primal> DB.
254 <     0> CartesianPoint  objects  Deleted.
255
256 DELETE TestObj and Point objects... 
257   STATUS= -201
258V O R T E x 0 1!V O R T E x 0 1!V O R T E x 0 1!V O R T E x 0 1!V O R T E x 0 1!
259