function_test/Semantic_Analyser/encode/encode_SE.ttcn

   1 /******************************************************************************
   2  * Copyright (c) 2000-2014 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 module encode_SE { //^In TTCN-3 module//
   9
  10 type integer AnInt with { encode "nonexistent" }; //^error\: Unknown encoding \'nonexistent\'$//
  11
  12 type record ARecord { //^error\: Unknown encoding \'whatever\'$//
  13   integer i,
  14   octetstring os
  15 }
  16
  17 control { //^In control part//
  18   var ARecord x;
  19   var AnInt y;
  20   var bitstring bs := '110'B;
  21
  22   if (decvalue(bs, y) != 0) {} //^In if statement// //^In the left operand of operation// //^In the parameters of decvalue()//
  23   if (decvalue(bs, x) != 0) {} //^In if statement// //^In the left operand of operation// //^In the parameters of decvalue()//
  24 }
  25
  26 } with {
  27   encode "whatever"
  28 }