source: ThirdParty/Mumps/trunk/mumps_4.7.3.Win.patch @ 825

Last change on this file since 825 was 825, checked in by andreasw, 14 years ago

added Teds MUMPS patch for Windows to ThirdParty/Mumps?/trunk

File size: 3.2 KB
  • include/cmumps_c.h

    diff -Naur MUMPS/include/cmumps_c.h MUMPS.patched/include/cmumps_c.h
    old new  
    109109  } CMUMPS_STRUC_C;
    110110
    111111
    112 #if defined(UPPER) || defined(_WIN32)
     112#if defined(UPPER)
    113113#define cmumps_f77_ CMUMPS_F77
    114114#define cmumps_affect_mapping_ CMUMPS_AFFECT_MAPPING
    115115#define cmumps_affect_pivnul_list_ CMUMPS_AFFECT_PIVNUL_LIST
  • include/dmumps_c.h

    diff -Naur MUMPS/include/dmumps_c.h MUMPS.patched/include/dmumps_c.h
    old new  
    108108  } DMUMPS_STRUC_C;
    109109
    110110
    111 #if defined(UPPER) || defined(_WIN32)
     111#if defined(UPPER)
    112112#define dmumps_f77_ DMUMPS_F77
    113113#define dmumps_affect_mapping_ DMUMPS_AFFECT_MAPPING
    114114#define dmumps_affect_pivnul_list_ DMUMPS_AFFECT_PIVNUL_LIST
  • include/smumps_c.h

    diff -Naur MUMPS/include/smumps_c.h MUMPS.patched/include/smumps_c.h
    old new  
    108108  } SMUMPS_STRUC_C;
    109109
    110110
    111 #if defined(UPPER) || defined(_WIN32)
     111#if defined(UPPER)
    112112#define smumps_f77_ SMUMPS_F77
    113113#define smumps_affect_mapping_ SMUMPS_AFFECT_MAPPING
    114114#define smumps_affect_pivnul_list_ SMUMPS_AFFECT_PIVNUL_LIST
  • include/zmumps_c.h

    diff -Naur MUMPS/include/zmumps_c.h MUMPS.patched/include/zmumps_c.h
    old new  
    109109  } ZMUMPS_STRUC_C;
    110110
    111111
    112 #if defined(UPPER) || defined(_WIN32)
     112#if defined(UPPER)
    113113#define zmumps_f77_ ZMUMPS_F77
    114114#define zmumps_affect_mapping_ ZMUMPS_AFFECT_MAPPING
    115115#define zmumps_affect_pivnul_list_ ZMUMPS_AFFECT_PIVNUL_LIST
  • libseq/mpi.f

    diff -Naur MUMPS/libseq/mpi.f MUMPS.patched/libseq/mpi.f
    old new  
    493493C     elapsed time
    494494      DOUBLE PRECISION VAL
    495495C     write(*,*) 'Entering MPI_WTIME'
    496       CALL ELAPSE( VAL )
     496      VAL = 0.d0
    497497      MPI_WTIME = VAL
    498498C     write(*,*) 'Exiting MPI_WTIME'
    499499      RETURN
  • src/dmumps_io.h

    diff -Naur MUMPS/src/dmumps_io.h MUMPS.patched/src/dmumps_io.h
    old new  
    4646*/
    4747/*    $Id: dmumps_io.h,v 1.30 2006/12/06 12:05:49 jylexcel Exp $ */
    4848
    49 #if defined(_WIN32) || defined (UPPER)
     49#if defined (UPPER)
    5050#define dmumps_is_there_finished_request DMUMPS_IS_THERE_FINISHED_REQUEST
    5151#define dmumps_clean_request DMUMPS_CLEAN_REQUEST
    5252#define dmumps_test_request DMUMPS_TEST_REQUEST
  • src/dmumps_io_err.h

    diff -Naur MUMPS/src/dmumps_io_err.h MUMPS.patched/src/dmumps_io_err.h
    old new  
    4848
    4949#include <errno.h>
    5050
    51 #if defined(UPPER) || defined(_WIN32)
     51#if defined(UPPER)
    5252#define dmumps_low_level_init_err_str DMUMPS_LOW_LEVEL_INIT_ERR_STR
    5353#elif defined(Add_)
    5454#define dmumps_low_level_init_err_str dmumps_low_level_init_err_str_
Note: See TracBrowser for help on using the repository browser.