regression_test/RAW/HS16977/HS16977_Types.ttcn

   1 /******************************************************************************
   2  * Copyright (c) 2000-2016 Ericsson Telecom AB
   3  * All rights reserved. This program and the accompanying materials
   4  * are made available under the terms of the Eclipse Public License v1.0
   5  * which accompanies this distribution, and is available at
   6  * http://www.eclipse.org/legal/epl-v10.html
   7  *
   8  * Contributors:
   9  *   Balasko, Jeno
  10  *   Baranyi, Botond
  11  *
  12  ******************************************************************************/
  13 module HS16977_Types {
  14   import from HS16977_Constants all;
  15
  16   type record t_inner_rec {
  17     integer obj_type,
  18     integer len,
  19     t_union val
  20   } with {
  21     variant (val) "CROSSTAG(i, obj_type = c_int_choice; f, obj_type = c_float_choice;
  22        cs, obj_type = c_cs_choice; outer, obj_type = c_outer_choice; os, OTHERWISE)";
  23   }
  24
  25   type union t_union {
  26     integer i,
  27     float f,
  28     charstring cs,
  29     octetstring os,
  30     t_outer_rec outer
  31   }
  32
  33   type record t_outer_rec {
  34     integer len,
  35     t_inner_rec inner
  36   } with {
  37     variant ""
  38   }
  39
  40 } with {
  41   encode "RAW";
  42 }