Ignore:
Timestamp:
10/30/09 18:11:29 (12 years ago)
Author:
ymipsl
Message:

Correction de bug lorsque le serveur accumule trop de requÚtes et ne passe pas en mode bloquant.
YM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XMLIO_SERVER/trunk/src/IOSERVER/mod_mpi_buffer_server.f90

    r37 r43  
    110110            ENDIF 
    111111             
    112             IF (buffer_space < message_size .OR. buffers(n)%request_free==0) THEN 
     112            IF (buffer_space < message_size .OR. buffers(n)%request_free<=max_request/2) THEN 
    113113              ok_out=.TRUE. 
    114114!              PRINT *,"BUFFER FULL !!!!" 
Note: See TracChangeset for help on using the changeset viewer.