Q118547: PRB: Multithreaded Program Crashes

Article: Q118547
Product(s): Microsoft Fortran Compiler
Version(s): 1.0
Operating System(s): 
Keyword(s): kbcode kbCompiler kbFL32 kbFortranPS
Last Modified: 04-MAY-2001

-------------------------------------------------------------------------------
The information in this article applies to:

- Microsoft Fortran Powerstation 32 for Windows NT, version 1.0 
-------------------------------------------------------------------------------

SYMPTOMS
========

A program that uses the multithread run-time library fails to run to completion
or generates a Dr. Watson access-violation error message.

CAUSE
=====

This behavior can occur if the compile options are not consistent with the
libraries included in linking.

RESOLUTION
==========

If the program is linked using the MSFRT.LIB and MSVCRT.LIB files, your object
modules must be compiled using the -MD option.

NOTE: This behavior was changed in Microsoft FORTRAN PowerStation version 4.0.

MORE INFORMATION
================

To demonstrate the problem and workaround, compile the sample code below
(TESTC), using the four different tests listed. The first two tests demonstrate
the problem, while the last two tests show two sets of options that do not cause
problems:

Test 1
------

The TESTC created using these options will produce a Dr. Watson error message:

     CL -c TESTC.CPP
     FL32 -LD TESTF.FOR
     FL32 -MD TESTC.OBJ TESTF.LIB

Test 2
------

The TESTC created using these options will not produce an error message, but will
fail to run completely and will not produce any output:

     CL -c -MD TESTC.CPP
     FL32 -LD TESTF.FOR
     FL32 -ML TESTC.OBJ TESTF.LIB

-or-

     FL32 -MT TESTC.OBJ TESTF.LIB

Test 3
------

The TESTC created using these options will create a TESTC program that is linked
to MSFRT.LIB and MSVCCRT.LIB. The actual run-time code is in the DLLs MSFRT10
and MSVCRT10. This TESTC will correctly display the message, "Factorial of 7 is:
5040":

     CL -c -MD TESTC.CPP
     FL32 -LD TESTF.FOR
     FL32 -MD TESTC.OBJ TESTF.LIB

Test 4
------

The TESTC created using these options has the run-time code statically linked
into the executable file. It will also correctly display the message, "Factorial
of 7 is: 5040":

     CL -c TESTC.CPP
     FL32 -LD TESTF.FOR
     FL32 -ML TESTC.OBJ TESTF.LIB

-or-

     FL32 -MT TESTC.OBJ TESTF.LIB

C Sample Code
-------------

  /* Compile options needed: see text above
  */ 
     #include <iostream.h>
     extern "C" {void __stdcall FACT (int n, int *amt);}
     int main() {
        int amt;
        FACT(7, &amt);
        cout << "Factorial of 7 is: " << amt;
        return 0;
     }

FORTRAN Sample Code
-------------------

  C Compile options needed: see text above
        SUBROUTINE Fact[DLLEXPORT](n, amt)
        INTEGER*4 n [VALUE]
        INTEGER*4 amt [REFERENCE]
        INTEGER*4 i
        amt = 1
        DO i = 1, n
          amt = amt * i
        END DO
        END

Additional query words: 1.00 multi-thread

======================================================================
Keywords          : kbcode kbCompiler kbFL32 kbFortranPS 
Technology        : kbAudDeveloper kbFortranSearch kbZNotKeyword2 kbFORTRANPower32100NT
Version           : :1.0

=============================================================================

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Copyright Microsoft Corporation 1986-2002.