regression_test/compileonly/HT48786/Test2.ttcn

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Copyright (c) 2000-2015 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
   9 module Test2 {
  10
  11 type record of integer Record1;
  12 type record of Record1 Record2;
  13
  14 function f1() {
  15     var Record2 r1, r2;
  16     r1 := {{1, 2}};
  17     r2 := valueof(r1);
  18     r2 := valueof({{1, 2}});
  19 }
  20
  21 }