From 87d5f7075190388968f75022813f89cb93465ae6 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Milo=C5=A1=20Mula=C4=8D?= Date: Wed, 16 Dec 2009 13:19:17 +0000 Subject: [PATCH] generate correctly datatypes containnig underscore --- org.glite.lb.server/src/ws_typeref.c.T | 2 ++ 1 file changed, 2 insertions(+) diff --git a/org.glite.lb.server/src/ws_typeref.c.T b/org.glite.lb.server/src/ws_typeref.c.T index 2233e49..61a4aa5 100644 --- a/org.glite.lb.server/src/ws_typeref.c.T +++ b/org.glite.lb.server/src/ws_typeref.c.T @@ -854,6 +854,7 @@ foreach ('_common_', sort { $event->{order}->{$a} <=> $event->{order}->{$b} } ge $upper_cn = $code->{name}; $enum_value = "${enum_value_prefix}${upper_cn}"; + $upper_cn =~ s/_/_USCORE/g; $soap_enum_value = "lbt__${soap_en}${soap_fn}__${upper_cn}"; gen "\tcase $soap_enum_value: *out = $enum_value; break;\n" } @@ -885,6 +886,7 @@ foreach ('_common_', sort { $event->{order}->{$a} <=> $event->{order}->{$b} } ge $upper_cn = $code->{name}; $enum_value = "${enum_value_prefix}${upper_cn}"; + $upper_cn =~ s/_/_USCORE/g; $soap_enum_value = "lbt__${soap_en}${soap_fn}__${upper_cn}"; gen "\tcase $enum_value: $target = $soap_enum_value; break;\n" } -- 1.8.2.3