From 55f75da71f69e66825e2b17e41ff29902e9e8a39 Mon Sep 17 00:00:00 2001 From: Christian daheim Date: Thu, 19 Jun 2014 00:13:26 +0200 Subject: [PATCH] Fix a bug in the LAPACK source linker --- generic/clapack_cutdown.c | 2 +- tools/cherrypick_clapack.tcl | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/generic/clapack_cutdown.c b/generic/clapack_cutdown.c index bb2f42b..5ea17b2 100644 --- a/generic/clapack_cutdown.c +++ b/generic/clapack_cutdown.c @@ -1,7 +1,7 @@ /* Generated code. Do not edit. See cherrypick_lapack.tcl */ /* This file contains a subset of LAPACK for use with Tcl/VecTcl */ /* available subroutines: dgesdd_ zgesdd_ dgemm_ zgemm_ dsyevr_ zheevr_ dgeev_ zgeev_ dgelss_ zgelss_ dgelsy_ zgelsy_ dgesv_ zgesv_ dgesvx_ zgesvx_ dgees_ zgees_ */ -#include "/Users/chris/Programmieren/VecTcl/generic/clapack_cutdown.h" +#include "clapack_cutdown.h" #include "f2c_mathlib.h" /* Declaring the Tcl replacement for xerbla */ MODULE_SCOPE int vectcl_xerbla(Tcl_Interp *interp, char* func, integer *info); diff --git a/tools/cherrypick_clapack.tcl b/tools/cherrypick_clapack.tcl index f42e732..fdec19c 100644 --- a/tools/cherrypick_clapack.tcl +++ b/tools/cherrypick_clapack.tcl @@ -369,7 +369,7 @@ proc generate_code {f args} { puts $fdc {/* Generated code. Do not edit. See cherrypick_lapack.tcl */} puts $fdc {/* This file contains a subset of LAPACK for use with Tcl/VecTcl */} puts $fdc "/* available subroutines: $subroutines */" - puts $fdc "#include \"$fh\"" + puts $fdc "#include \"[file tail $fh]\"" puts $fdc "#include \"f2c_mathlib.h\"" puts $fdc "/* Declaring the Tcl replacement for xerbla */"