/[ascend]/trunk/base/generic/solver/linsolqr.c
ViewVC logotype

Diff of /trunk/base/generic/solver/linsolqr.c

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

revision 707 by johnpye, Wed Jun 21 07:00:45 2006 UTC revision 708 by johnpye, Tue Jun 27 07:34:31 2006 UTC
# Line 522  void linsolqr_add_rhs(linsolqr_system_t Line 522  void linsolqr_add_rhs(linsolqr_system_t
522         ++(sys->rlength);         ++(sys->rlength);
523         if (sys->capacity>0)  {         if (sys->capacity>0)  {
524           rl->varvalue =           rl->varvalue =
525            (real64 *)ascmalloc(sys->capacity*sizeof(real64));            ASC_NEW_ARRAY(real64,sys->capacity);
526         }         }
527       }       }
528     }     }
# Line 762  static real64 *raise_capacity(real64 *ve Line 762  static real64 *raise_capacity(real64 *ve
762      newvec=(real64 *)ascrealloc(vec,(newcap * sizeof(real64)));      newvec=(real64 *)ascrealloc(vec,(newcap * sizeof(real64)));
763    } else {    } else {
764      newvec=(newcap > 0 ?      newvec=(newcap > 0 ?
765        (real64 *)ascmalloc( newcap * sizeof(real64) ) : NULL);        ASC_NEW_ARRAY(real64,newcap ) : NULL);
766    }    }
767  #ifndef NDEBUG  #ifndef NDEBUG
768    for (i = 0; i < newcap; i++) {    for (i = 0; i < newcap; i++) {

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

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