Allow dashes in constant names, replace with underscores in enums

diff --git a/org.glite.lb.common/interface/jobstat.h.T b/org.glite.lb.common/interface/jobstat.h.T
index d8612cf..047b01c 100644 (file)
--- a/org.glite.lb.common/interface/jobstat.h.T
+++ b/org.glite.lb.common/interface/jobstat.h.T
@@ -41,6 +41,7 @@ extern "C" {
 };
                        for (@{$f->{codes}}) {
                                my $uc = uc $_->{name};
+                               $uc =~ tr/-/_/;
                                gen qq{
 !      EDG_WLL_STAT_$uc,               /**< $_->{comment} */
 };

diff --git a/org.glite.lb.types/status.T b/org.glite.lb.types/status.T
index 7dc6cb4..6ba6dbd 100644 (file)
--- a/org.glite.lb.types/status.T
+++ b/org.glite.lb.types/status.T
@@ -144,8 +144,8 @@ int cream_state
        _code_  RUNNING
        _code_  REALLYRUNNING
        _code_  HELD
-       _code_  DONEOK
-       _code_  DONEFAILED
+       _code_  DONE-OK
+       _code_  DONE-FAILED
        _code_  ABORTED
 
 string cream_owner