Lines Matching refs:AR
16 package AR renames AdaBase.Results; packspec
34 function print_bits (bitdata : AR.Bits) return String;
36 function convert_chain (chain : AR.Chain) return String;
37 function convert_set (set : AR.Settype) return String;
59 function convert_chain (chain : AR.Chain) return String
61 use type AR.NByte1;
63 mask_ones : constant AR.NByte1 := 16#0F#;
86 function print_bits (bitdata : AR.Bits) return String
88 use type AR.Bit1;
101 function convert_set (set : AR.Settype) return String
181 v_nbyte0 : aliased AR.NByte0;
182 v_nbyte1 : aliased AR.NByte1;
183 v_nbyte2 : aliased AR.NByte2;
184 v_nbyte3 : aliased AR.NByte3;
185 v_nbyte4 : aliased AR.NByte4;
186 v_nbyte8 : aliased AR.NByte8;
187 v_byte1 : aliased AR.Byte1;
188 v_byte2 : aliased AR.Byte2;
189 v_byte3 : aliased AR.Byte3;
190 v_byte4 : aliased AR.Byte4;
191 v_byte8 : aliased AR.Byte8;
192 v_exact : aliased AR.Real18;
193 v_real9 : aliased AR.Real9;
194 v_real18 : aliased AR.Real18;
195 v_text1 : aliased AR.Textual;
196 v_text2 : aliased AR.Textual;
197 v_text3 : aliased AR.Textual;
198 v_text4 : aliased AR.Textual;
199 v_text5 : aliased AR.Textual;
200 v_text6 : aliased AR.Textual;
201 v_time1 : aliased AR.AC.Time;
202 v_time2 : aliased AR.AC.Time;
203 v_time3 : aliased AR.AC.Time;
204 v_time4 : aliased AR.AC.Time;
205 v_year : aliased AR.NByte2;
206 v_bit : aliased AR.Bits := (0 .. 15 => 0);
207 v_chain1 : aliased AR.Chain := (1 .. 4 => 0);
208 v_chain2 : aliased AR.Chain := (1 .. 6 => 0);
209 v_chain3 : aliased AR.Chain := (1 .. 16 => 0);
210 v_chain4 : aliased AR.Chain := (1 .. 16 => 0);
211 v_chain5 : aliased AR.Chain := (1 .. 16 => 0);
212 v_chain6 : aliased AR.Chain := (1 .. 16 => 0);
213 v_enum : aliased AR.Enumtype;
214 v_set : aliased AR.Settype := (1 .. 6 => (AR.PARAM_IS_ENUM));
347 v_nbyte0 : aliased AR.NByte0 := False;
348 v_nbyte1 : aliased AR.NByte1 := 22;
349 v_nbyte2 : aliased AR.NByte2 := 5800;
350 v_nbyte3 : aliased AR.NByte3 := 9;
351 v_nbyte4 : aliased AR.NByte4 := AR.NByte4 (2 ** 20);
352 v_nbyte8 : aliased AR.NByte8 := AR.NByte8 (2 ** 24 + 1);
353 v_byte1 : aliased AR.Byte1 := AR.Byte1 (-2);
354 v_byte2 : aliased AR.Byte2 := AR.Byte2 (-132);
355 v_byte3 : aliased AR.Byte3 := AR.Byte3 (-8000000);
356 v_byte4 : aliased AR.Byte4 := 24;
357 v_byte8 : aliased AR.Byte8 := 128;
358 v_exact : aliased AR.Real9 := 7.32;
359 v_real9 : aliased AR.Real9 := 999.01234;
360 v_real18 : aliased AR.Real18 := 99999.01234567890123456789;
361 v_text1 : aliased AR.Textual := CT.SUS ("Popeye");
362 v_text2 : aliased AR.Textual := CT.SUS ("Daredevel");
363 v_text3 : aliased AR.Textual := CT.SUS ("The Punisher");
364 v_text4 : aliased AR.Textual := CT.SUS ("Electra");
365 v_text5 : aliased AR.Textual := CT.SUS ("Iron Man");
366 v_text6 : aliased AR.Textual := CT.SUS ("Bruce Banner");
367 v_time1 : aliased AR.AC.Time := CFM.Time_Of (1995, 2, 14);
368 v_time2 : aliased AR.AC.Time := CFM.Time_Of (1998, 3, 17, 6, 7, 8);
369 v_time3 : aliased AR.AC.Time := CFM.Time_Of (2005, 4, 20, 1, 32, 0);
370 v_time4 : aliased AR.AC.Time := CFM.Time_Of (1901, 1, 1, 4, 57, 50);
371 v_year : aliased AR.NByte2 := 1992;
372 v_bit : aliased AR.Textual := CT.SUS ("010101111111");
373 v_chain1 : aliased AR.Chain := (12, 44, 65, 240);
374 v_chain2 : aliased AR.Chain := (97, 99, 102);
375 v_chain3 : aliased AR.Chain := (1, 0, 20, 37, 10);
376 v_chain4 : aliased AR.Chain := (200, 232, 98, 100, 77, 82);
377 v_chain5 : aliased AR.Chain := (50, 12, 2, 4, 99, 255, 27);
378 v_chain6 : aliased AR.Chain := (0, 0, 0, 0, 1, 2, 3, 4);
379 v_enum : aliased AR.Enumtype := (enumeration => CT.SUS ("pink"));
380 v_set : aliased AR.Settype := ((enumeration => CT.SUS ("red")),
382 v_set2 : AR.Settype := ((enumeration => CT.SUS ("yellow")),
385 v_chain7 : AR.Chain := (65, 66, 67, 68);
386 v_chain8 : AR.Chain := (97, 98, 99, 100, 101);
465 stmt.assign (1, AR.PARAM_IS_NBYTE_3);
466 stmt.assign (2, AR.PARAM_IS_BOOLEAN);
467 stmt.assign (3, AR.PARAM_IS_NBYTE_1);
468 stmt.assign (4, AR.PARAM_IS_BYTE_2);
469 stmt.assign (5, AR.PARAM_IS_BYTE_4);
470 stmt.assign (6, AR.PARAM_IS_NBYTE_8);
471 stmt.assign (7, AR.PARAM_IS_REAL_9);
472 stmt.assign (8, AR.PARAM_IS_REAL_18);
473 stmt.assign (9, AR.PARAM_IS_REAL_18);
474 stmt.assign (10, AR.PARAM_IS_TIMESTAMP);
475 stmt.assign (11, AR.PARAM_IS_TIMESTAMP);
476 stmt.assign (12, AR.PARAM_IS_TIMESTAMP);
477 stmt.assign (13, AR.PARAM_IS_NBYTE_2);
478 stmt.assign (14, AR.PARAM_IS_TEXTUAL);
479 stmt.assign (15, AR.PARAM_IS_ENUM);
480 stmt.assign (16, AR.PARAM_IS_SET);
481 stmt.assign (17, AR.PARAM_IS_CHAIN);
482 stmt.assign (18, AR.PARAM_IS_CHAIN);