function_test/Semantic_Analyser/xer/ae_wrong_type_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 ae_wrong_type_SE {       //^In TTCN-3 module `ae_wrong_type_SE'://
   9
  10 type record R { //^In type definition//
  11   integer i //^In record field// \
  12             //^error: ANY-ELEMENT can only be applied to UTF8String or universal charstring type//
  13 }
  14 with {
  15   variant (i) "anyElement"
  16 }
  17
  18 type record R2 {
  19   record of universal charstring ae
  20 }
  21 with {
  22   variant (ae)    "anyElement"; /* also accepted on record of universal charstring,
  23   although it can be assigned directly to the elments of it */
  24   //variant (ae[-]) "anyElement";
  25 }
  26
  27 }
  28 with {
  29 encode "XML";
  30 }