Changeset 416


Ignore:
Timestamp:
10/06/08 15:11:54 (13 years ago)
Author:
bellier
Message:

Changed an initialization to suppress a bug in a test (from JG)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • IOIPSL/trunk/src/histcom.f90

    r386 r416  
    19731973      ALLOCATE (buffer(buff_pos)) 
    19741974      buffer_sz = buff_pos 
     1975      buffer(:)=0.0 
    19751976      buffer(:SIZE(buffer_used))=buffer_used 
    19761977      DEALLOCATE (buffer_used) 
Note: See TracChangeset for help on using the changeset viewer.