[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
gnue/geas/lib/classdefs classdata.c
From: |
Neil Tiffin |
Subject: |
gnue/geas/lib/classdefs classdata.c |
Date: |
Fri, 25 May 2001 15:11:24 -0700 |
CVSROOT: /home/cvs
Module name: gnue
Changes by: Neil Tiffin <address@hidden> 01/05/25 15:11:24
Modified files:
geas/lib/classdefs: classdata.c
Log message:
Fix bug that types were not correctly creating default value and format
for CHAR. Add display of format to odl_display_tree().
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/geas/lib/classdefs/classdata.c.diff?cvsroot=OldCVS&tr1=1.50&tr2=1.51&r1=text&r2=text
Patches:
Index: gnue/geas/lib/classdefs/classdata.c
diff -u gnue/geas/lib/classdefs/classdata.c:1.50
gnue/geas/lib/classdefs/classdata.c:1.51
--- gnue/geas/lib/classdefs/classdata.c:1.50 Fri May 25 12:34:52 2001
+++ gnue/geas/lib/classdefs/classdata.c Fri May 25 15:11:23 2001
@@ -22,7 +22,7 @@
along with this program; if not, write to the Free Software Foundation,
Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- $Id: classdata.c,v 1.50 2001/05/25 19:34:52 ntiffin Exp $
+ $Id: classdata.c,v 1.51 2001/05/25 22:11:23 ntiffin Exp $
*/
@@ -1814,6 +1814,8 @@
n->datatypeclass = NULL;
}
n->properties = type_field->properties;
+ n->format = g_strdup( type_field->format );
+ n->defaultval = g_strdup( type_field->defaultval );
c->contents = g_list_append (c->contents, n);
#ifdef DEBUG
/* printf( " Made '%s'\n" , n->base.name ); */
@@ -2465,6 +2467,10 @@
{
case FT_basic:
fprintf (out, " Basic: %s", odl_datatype_name (it->datatype));
+ if (it->format != NULL)
+ {
+ fprintf (out, "<%s>", it->format);
+ }
if (it->properties & ODL_PROP_NOTNULL)
{
fprintf (out, " NOT NULL");