Release 0.93.5

[gob-dx.git] / src / util.c

diff --git a/src/util.c b/src/util.c
index 03f1b7135c21e801a101204446085cbdda762749..e47be5ef6110be81001f7c279afdb18571f843c9 100644 (file)
--- a/src/util.c
+++ b/src/util.c
@@ -1,5 +1,6 @@
 /* GOB C Preprocessor
  * Copyright (C) 1999-2000 the Free Software Foundation.
+ * Copyright (C) 2000 Eazel, Inc.
  *
  * Author: George Lebl
  *
@@ -237,3 +238,15 @@ setup_special_array(Class *c, gboolean *special_array)
 
        return any_special;
 }
+
+/* get the id without the first underscore, but only if we're removing them */
+char *
+get_real_id(char *id)
+{
+       if(!no_kill_underscores &&
+          id[0] == '_' &&
+          id[1] != '\0')
+               return &id[1];
+       else
+               return id;
+}