|
|
|---|
/* | /* |
* If requested, see if we can locate a comparison BLAS | * If requested, see if we can locate a comparison BLAS |
*/ | */ |
|
/* Gentoo |
if (F77 && BLASlib) | if (F77 && BLASlib) |
{ | { |
GetBlasTry(OS, mach, BLASlib); | GetBlasTry(OS, mach, BLASlib); |
FindBlas(fpout, fplog, redir, F77, F77FLAGS, BLASlib); | FindBlas(fpout, fplog, redir, F77, F77FLAGS, BLASlib); |
} | } |
|
*/ |
/* | /* |
* If using a non-g77 Fortran under Windows, throw the -mno-cygwin for all gcc | * If using a non-g77 Fortran under Windows, throw the -mno-cygwin for all gcc |
*/ | */ |
|
|
|---|
else if (strstr(ln, "Athlon(tm) 64")) mach = AmdHammer64; | else if (strstr(ln, "Athlon(tm) 64")) mach = AmdHammer64; |
else if (strstr(ln, "Athlon")) mach = AmdAthlon; | else if (strstr(ln, "Athlon")) mach = AmdAthlon; |
else if (strstr(ln, "AMD-K7")) mach = AmdAthlon; | else if (strstr(ln, "AMD-K7")) mach = AmdAthlon; |
|
else if (strstr(ln, "XEON")) mach = IntP4; /* Gentoo */ |
} | } |
break; | break; |
default:; | default:; |
|
|
|---|
if (i || ln[0] == '\0' || strstr(ln, "i586") || strstr(ln, "i486") || | if (i || ln[0] == '\0' || strstr(ln, "i586") || strstr(ln, "i486") || |
strstr(ln, "i386")) | strstr(ln, "i386")) |
{ | { |
|
#ifndef INTERACTIVE |
|
exit(-1); /*/ Make ebuild complain. */ |
|
#endif |
fprintf(stdout, "Enter your machine type:\n"); | fprintf(stdout, "Enter your machine type:\n"); |
fprintf(stdout, " 1. Other/UNKNOWN\n\n"); | fprintf(stdout, " 1. Other/UNKNOWN\n\n"); |
fprintf(stdout, " 2. AMD Athlon\n"); | fprintf(stdout, " 2. AMD Athlon\n"); |
|
|
|---|
} | } |
else if (strstr(ln, "ia64")) | else if (strstr(ln, "ia64")) |
{ | { |
|
#ifndef INTERACTIVE |
|
exit(-1); /*/ Make ebuild complain. */ |
|
#endif |
fprintf(stdout, "Enter your machine type:\n"); | fprintf(stdout, "Enter your machine type:\n"); |
fprintf(stdout, " 1. Other/UNKNOWN\n"); | fprintf(stdout, " 1. Other/UNKNOWN\n"); |
fprintf(stdout, " 2. IA-64 Itanium 1\n"); | fprintf(stdout, " 2. IA-64 Itanium 1\n"); |
|
|
|---|
} | } |
else if (strstr(ln, "x86_64")) | else if (strstr(ln, "x86_64")) |
{ | { |
|
#ifndef INTERACTIVE |
|
exit(-1); /*/ Make ebuild complain. */ |
|
#endif |
fprintf(stdout, "Enter your machine type:\n"); | fprintf(stdout, "Enter your machine type:\n"); |
fprintf(stdout, " 1. Other/UNKNOWN\n"); | fprintf(stdout, " 1. Other/UNKNOWN\n"); |
fprintf(stdout, " 2. 32 bit AMD Hammer\n"); | fprintf(stdout, " 2. 32 bit AMD Hammer\n"); |
|
|
|---|
} | } |
else if (strstr(ln, "i686")) | else if (strstr(ln, "i686")) |
{ | { |
|
#ifndef INTERACTIVE |
|
exit(-1); /* Make ebuild complain. */ |
|
#endif |
fprintf(stdout, "Enter your machine type:\n"); | fprintf(stdout, "Enter your machine type:\n"); |
fprintf(stdout, " 1. Other/UNKNOWN\n"); | fprintf(stdout, " 1. Other/UNKNOWN\n"); |
fprintf(stdout, " 2. AMD Athlon\n"); | fprintf(stdout, " 2. AMD Athlon\n"); |
|
|
|---|
if (ierr) | if (ierr) |
{ | { |
fprintf(stderr, "File Make.%s already exists!\n", ARCH); | fprintf(stderr, "File Make.%s already exists!\n", ARCH); |
ierr = !IsYes('n', "", "overwrite it?"); |
/* Gentoo ierr = !IsYes('n', "", "overwrite it?"); */ |
|
ierr = !IsYes('y', "", "overwrite it?"); |
} | } |
} | } |
while (ierr); | while (ierr); |
|
|
|---|
fprintf(fpout, " MVTdir = $(TOPdir)/tune/blas/gemv/$(ARCH)\n"); | fprintf(fpout, " MVTdir = $(TOPdir)/tune/blas/gemv/$(ARCH)\n"); |
fprintf(fpout, " R1Tdir = $(TOPdir)/tune/blas/ger/$(ARCH)\n"); | fprintf(fpout, " R1Tdir = $(TOPdir)/tune/blas/ger/$(ARCH)\n"); |
fprintf(fpout, " L1Tdir = $(TOPdir)/tune/blas/level1/$(ARCH)\n"); | fprintf(fpout, " L1Tdir = $(TOPdir)/tune/blas/level1/$(ARCH)\n"); |
fprintf(fpout, " L3Tdir = $(TOPdir)/tune/blas/level3/$(ARCH)\n\n"); |
fprintf(fpout, " L3Tdir = $(TOPdir)/tune/blas/level3/$(ARCH)\n"); |
| |
fprintf(fpout, | fprintf(fpout, |
"# ---------------------------------------------------------------------\n"); | "# ---------------------------------------------------------------------\n"); |
|
|
|---|
fprintf(fpout, " BC = $(CC)\n"); | fprintf(fpout, " BC = $(CC)\n"); |
fprintf(fpout, " BCFLAGS = $(CCFLAGS)\n"); | fprintf(fpout, " BCFLAGS = $(CCFLAGS)\n"); |
} | } |
|
#ifdef USE_LIBTOOL |
|
fprintf(fpout, " LIBTOOL = libtool --mode=compile\n"); |
|
fprintf(fpout, " ARCHIVER = $(TOPdir)/war %s\n", ARCHIVER); |
|
#else |
fprintf(fpout, " ARCHIVER = %s\n", ARCHIVER); | fprintf(fpout, " ARCHIVER = %s\n", ARCHIVER); |
|
#endif |
fprintf(fpout, " ARFLAGS = %s\n", ARFLAGS); | fprintf(fpout, " ARFLAGS = %s\n", ARFLAGS); |
fprintf(fpout, " RANLIB = %s\n\n", RANLIB); | fprintf(fpout, " RANLIB = %s\n\n", RANLIB); |
| |
