Sync with 5.4.0

[deliverable/titan.core.git] / function_test / Semantic_Analyser / xer / emb_first_untag_SE.ttcn

/******************************************************************************
 * Copyright (c) 2000-2015 Ericsson Telecom AB
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * http://www.eclipse.org/legal/epl-v10.html
 ******************************************************************************/
module emb_first_untag_SE {	//^In TTCN-3 module `emb_first_untag_SE'://

type record e1 { //^In type definition// \
//^error: Neither the SEQUENCE-OF supporting EMBED-VALUES,nor its component shall have UNTAGGED\.//
  record of universal charstring field_1 
}
with {
  variant "embedValues"
  variant (field_1) "untagged"
}

type record e2 { //^In type definition// \
//^error: Neither the SEQUENCE-OF supporting EMBED-VALUES,nor its component shall have UNTAGGED\.//
  record of universal charstring field_1 
}
with {
  variant "embedValues"
  variant (field_1[-]) "untagged"
}




}
with {
encode "XML"
}