/[ascend]/trunk/base/generic/compiler/relation_io.c
ViewVC logotype

Diff of /trunk/base/generic/compiler/relation_io.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 707 by johnpye, Thu Jun 22 08:12:19 2006 UTC revision 708 by johnpye, Tue Jun 27 07:34:31 2006 UTC
# Line 435  char *WriteRelationPostfixString( CONST Line 435  char *WriteRelationPostfixString( CONST
435    r = GetInstanceRelation(relinst,&type);    r = GetInstanceRelation(relinst,&type);
436    if (type!=e_token) {    if (type!=e_token) {
437      FPRINTF(ASCERR,"Invalid relation type in WriteRelationPostfixString\n");      FPRINTF(ASCERR,"Invalid relation type in WriteRelationPostfixString\n");
438      result=(char *)ascmalloc(60);      result=ASC_NEW_ARRAY(char,60);
439      if (result==NULL) return result;      if (result==NULL) return result;
440      sprintf(result,"WriteRelationPostfixString called on non-token relation.");      sprintf(result,"WriteRelationPostfixString called on non-token relation.");
441      return result;      return result;
# Line 1372  char *WriteRelationString(CONST struct I Line 1372  char *WriteRelationString(CONST struct I
1372    
1373    reln = GetInstanceRelation(relinst,&reltype);    reln = GetInstanceRelation(relinst,&reltype);
1374    if (!reln) {    if (!reln) {
1375      result = (char *) ascmalloc(15);      result = ASC_NEW_ARRAY(char,15);
1376      if (result == NULL) return result;      if (result == NULL) return result;
1377      sprintf(result,"NULL relation\n");      sprintf(result,"NULL relation\n");
1378      if (lenptr != NULL) {      if (lenptr != NULL) {

Legend:
Removed from v.707  
changed lines
  Added in v.708

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22