Changeset 32 for XMLIO_SERVER/trunk/src/IOSERVER/mod_event_client.f90
- Timestamp:
- 04/20/09 18:16:37 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XMLIO_SERVER/trunk/src/IOSERVER/mod_event_client.f90
r26 r32 1 1 MODULE mod_event_client 2 2 USE mod_pack, ONLY : pack, pack_field 3 USE mod_mpi_buffer_client, ONLY : create_request, finalize_request 3 USE mod_mpi_buffer_client, ONLY : create_request, finalize_request,is_last_request 4 4 USE mod_event_parameters 5 5 USE mod_ioserver_namelist … … 293 293 IF (using_server) THEN 294 294 CALL create_request(event_id_stop_ioserver) 295 is_last_request=.TRUE. 295 296 CALL Finalize_request 296 297 ELSE
Note: See TracChangeset
for help on using the changeset viewer.