~ubuntu-branches/ubuntu/trusty/atlas/trusty

« back to all changes in this revision

Viewing changes to src/auxil/ATL_syreflect.c

  • Committer: Package Import Robot
  • Author(s): Sébastien Villemot
  • Date: 2013-07-27 14:26:05 UTC
  • mfrom: (18.1.8 sid)
  • Revision ID: package-import@ubuntu.com-20130727142605-5rh3p972h1whdo99
Tags: 3.10.1-2
* Allow the generic package to build on machines with CPU throttling
  enabled. Otherwise the package FTBFS on some buildds (e.g. biber).
  Implementation is done by reactivating the "-Si cputhrchk 0" flag
  (cpu-throtthling-check.diff), and using it in debian/rules.
* Add architectural defaults for armel and mips.
* armhf.diff: do not enforce 32-registers FPU for Fortran

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
/*
2
 
 *             Automatically Tuned Linear Algebra Software v3.8.4
 
2
 *             Automatically Tuned Linear Algebra Software v3.10.1
3
3
 *                    (C) Copyright 1999 R. Clint Whaley
4
4
 *
5
5
 * Redistribution and use in source and binary forms, with or without
38
38
{
39
39
   int j;
40
40
   #ifdef TCPLX
41
 
      const int ldc2 = ldc+ldc, incC = ldc2+2;
 
41
      const size_t ldc2 = ldc+ldc, incC = ldc2+2;
42
42
   #else
43
 
      const int incC = ldc+1;
44
 
      #define ldc2 ldc
 
43
      const size_t incC = ldc+1, ldc2=ldc;
45
44
   #endif
46
45
   TYPE *pC;
47
46
   if (Uplo == AtlasLower)
51
50
   }
52
51
   else
53
52
   {
54
 
      pC = C + ((N-1)SHIFT);
 
53
      pC = C + (((size_t)(N-1))SHIFT);
55
54
      C += ldc2*(N-1);
56
55
      for (j=0; j < N-1; j++, C -= ldc2, pC -= (1 SHIFT))
57
56
         Mjoin(PATL,copy)(N-j-1, C, 1, pC, ldc);