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

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

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

revision 911 by johnpye, Thu Oct 26 13:35:25 2006 UTC revision 912 by johnpye, Fri Oct 27 07:18:21 2006 UTC
# Line 2005  double CalcRelationNominal(struct Instan Line 2005  double CalcRelationNominal(struct Instan
2005      }      }
2006    }    }
2007    if (reltype == e_blackbox){    if (reltype == e_blackbox){
2008  #ifdef BBOXWHINE      if(!msg){
2009      ERROR_REPORTER_HERE(ASC_PROG_ERR,"blackbox not implemented yet (assuming 1.0) (%s)",__FUNCTION__); /* FIXME nominal blackbox */        ERROR_REPORTER_HERE(ASC_PROG_WARNING,"Relation nominals not yet implemented\n"
2010  #endif          "for blackbox or glassbox (assuming 1.0)",__FUNCTION__);
2011          msg = 1;
2012        }
2013      /* should pull the nominal from the assigned lhs variable. */      /* should pull the nominal from the assigned lhs variable. */
2014    }    }
2015    if (reltype == e_glassbox){    if (reltype == e_glassbox){
2016      if(!msg){      if(!msg){
2017          ERROR_REPORTER_HERE(ASC_PROG_WARNING,"glassbox not implemented yet (assuming 1.0) (%s)",__FUNCTION__);        ERROR_REPORTER_HERE(ASC_PROG_WARNING,"Relation nominals not yet implemented\n"
2018          msg=2;          "for blackbox or glassbox (assuming 1.0)",__FUNCTION__);
2019          msg=2;
2020      }      }
2021    }    }
2022    if (reltype == e_opcode){    if (reltype == e_opcode){
Legend:
Removed from v.911  
changed lines
  Added in v.912
john.pye@anu.edu.au
 ViewVC Help
Powered by ViewVC 1.1.22