[Patch, libfortran] PR 40812 Large file support on MinGW

[Kai Tietz]

2009/12/3 Danny Smith <dannysmith@clear.net.nz>:
>
> ----- Original Message ----- From: "Danny Smith"
>>
>> Test of  Janne's patch on mingw32 (using Vista) shows problems.
>> Although it fixes the testcases in the PR,  I get new failure
>> FAIL: gfortran.dg/PR19872.f execution test
>>
>> Ditto for my revised patch that is pre-w2k compatible.
>>
>> I suspect one problem is that we fail to lock the lowio handle for the
>> filedes in raw_truncate, as would be done in the libc chsize().  The lowio
>> stuff (eg, the ioinfo control structure) is not fully documented by MS,
>> although some of it is exposed in 3rd party code.
>>
>> Kai, did you get the PR19872.f  failure in your testsuite runs?
>>
>
> With Janne's patch, I also get new failures on backspace-2.f :
> (At line 10 of file backspace_2.f (unit = 11, file = 'fort.11')
> Fortran runtime error: I/O past end of record on unformatted file)
>
> and backspace-6.f: (abort)
>
> Danny
>

Hmm, yes. I get this too. Well, we could use here the exports of
msvcrt _lock/_unlock. Those are sadly undocumented. I'll give it a try
to see if this would help here.

Cheers,
Kai

-- 
|  (\_/) This is Bunny. Copy and paste
| (='.'=) Bunny into your signature to help
| (")_(") him gain world domination