/[escript]/branches/clazy/escriptcore/src/DataLazy.cpp
ViewVC logotype

Diff of /branches/clazy/escriptcore/src/DataLazy.cpp

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

revision 1986 by jfenwick, Thu Nov 6 01:49:39 2008 UTC revision 1987 by phornby, Fri Nov 7 02:59:02 2008 UTC
# Line 615  DataLazy::resolveUnary(ValueType& v, siz Line 615  DataLazy::resolveUnary(ValueType& v, siz
615    
616    
617    
618  #define PROC_OP(X) \  #define PROC_OP(TYPE,X)                               \
619      for (int i=0;i<steps;++i,resultp+=resultStep) \      for (int i=0;i<steps;++i,resultp+=resultStep) \
620      { \      { \
621         tensor_binary_operation(chunksize, &((*left)[lroffset]), &((*right)[rroffset]), resultp, X); \         tensor_binary_operation##TYPE(chunksize, &((*left)[lroffset]), &((*right)[rroffset]), resultp, X); \
622         lroffset+=leftStep; \         lroffset+=leftStep; \
623         rroffset+=rightStep; \         rroffset+=rightStep; \
624      }      }
# Line 673  cout << "Resolve binary: " << toString() Line 673  cout << "Resolve binary: " << toString()
673    switch(m_op)    switch(m_op)
674    {    {
675      case ADD:      case ADD:
676      PROC_OP(plus<double>());          PROC_OP(/**/,plus<double>());
677      break;      break;
678      case SUB:      case SUB:
679      PROC_OP(minus<double>());      PROC_OP(/**/,minus<double>());
680      break;      break;
681      case MUL:      case MUL:
682      PROC_OP(multiplies<double>());      PROC_OP(/**/,multiplies<double>());
683      break;      break;
684      case DIV:      case DIV:
685      PROC_OP(divides<double>());      PROC_OP(/**/,divides<double>());
686      break;      break;
687      case POW:      case POW:
688      PROC_OP(::pow);         PROC_OP(<double (double,double)>,::pow);
689      break;      break;
690      default:      default:
691      throw DataException("Programmer error - resolveBinary can not resolve operator "+opToString(m_op)+".");      throw DataException("Programmer error - resolveBinary can not resolve operator "+opToString(m_op)+".");

Legend:
Removed from v.1986  
changed lines
  Added in v.1987

  ViewVC Help
Powered by ViewVC 1.1.26