From 1e9de6f33a780801c441b1dee0c46223923032fe Mon Sep 17 00:00:00 2001 From: Ed J Date: Sun, 31 Mar 2024 15:48:42 +0100 Subject: [PATCH] fix remaining 64-bit problems reported in, and fix #468 --- Changes | 2 ++ Libtmp/Minuit/minuitlib/futils.f | 4 ++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/Changes b/Changes index 63f7cc417..157ac1e08 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,5 @@ +- fix 64-bit problem in Minuit revealed by LTO (#468) - thanks @eli-schwartz for report + 2.085_02 2024-03-25 - PP add loop(n=value) idiom to start not at 0 - add whichover, inspired by https://stackoverflow.com/questions/77551179/perl-pdl-indexing-and-which diff --git a/Libtmp/Minuit/minuitlib/futils.f b/Libtmp/Minuit/minuitlib/futils.f index 5cb7ad5d0..77c33aa4d 100644 --- a/Libtmp/Minuit/minuitlib/futils.f +++ b/Libtmp/Minuit/minuitlib/futils.f @@ -1,6 +1,6 @@ subroutine abre(n,nombre,mode) - integer n + integer*8 n character*(*) nombre character*(*) mode @@ -10,7 +10,7 @@ subroutine abre(n,nombre,mode) subroutine cierra(n) - integer n + integer*8 n close(n)