Changeset a395c34 in OpenModelica


Ignore:
Timestamp:
2012-11-16T14:30:59+01:00 (11 years ago)
Author:
Jens Frenkel <jens.frenkel@…>
Branches:
Added-citation-metadata, maintenance/v1.14, maintenance/v1.15, maintenance/v1.16, maintenance/v1.17, maintenance/v1.18, maintenance/v1.19, maintenance/v1.20, maintenance/v1.21, maintenance/v1.22, maintenance/v1.23, master, omlib-staging
Children:
e3490e1
Parents:
0833cd1
Message:
  • bootstrapping

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@13920 f25d12d1-65f4-0310-ae8a-bbce733d8d8e

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Compiler/FrontEnd/Expression.mo

    r7faaff1 ra395c34  
    33503350    local
    33513351      list<DAE.Exp> expl;
    3352     case({},inExp) then inExp;
    3353     case(dims,inExp)
     3352    case({},_) then inExp;
     3353    case(_,_)
    33543354      equation
    33553355        oExp = arrayFill2(dims,inExp);
     
    33603360
    33613361protected function arrayFill2
    3362   input DAE.Dimensions dims;
     3362  input DAE.Dimensions iDims;
    33633363  input DAE.Exp inExp;
    33643364  output DAE.Exp oExp;
    33653365algorithm
    3366   oExp := matchcontinue(dims,inExp)
     3366  oExp := matchcontinue(iDims,inExp)
    33673367  local
    33683368    Integer i;
     
    33703370    Type ty;
    33713371    list<DAE.Exp> expl;
    3372  
    3373   case({d},inExp)
     3372    DAE.Dimensions dims;
     3373  case({d},_)
    33743374    equation
    33753375      ty = typeof(inExp);
     
    33793379      DAE.ARRAY(DAE.T_ARRAY(ty,{DAE.DIM_INTEGER(i)},DAE.emptyTypeSource),true,expl);
    33803380 
    3381   case(_::dims,inExp)
     3381  case(_::dims,_)
    33823382    equation
    33833383      print(" arrayFill2 not implemented for matrixes, only single arrays \n");
     
    33953395output list<DAE.Exp> expl;
    33963396algorithm expl := matchcontinue(n,e)
    3397   case(n,e)
     3397  case(_,_)
    33983398    equation
    33993399    true = intEq(n,0);
    34003400    then
    34013401      {};
    3402   case(n,e)
     3402  case(_,_)
    34033403    equation
    34043404      true = n>0;
Note: See TracChangeset for help on using the changeset viewer.