Changeset 1032 for trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh
- Timestamp:
- 07/29/14 14:31:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh
r1027 r1032 560 560 typeset ExistFlag finalPosition 561 561 562 finalPosition=$( mfls $1 2>/dev/null | wc -l ) 563 [ ${finalPosition} -eq 4 ] && ExistFlag=1 || ExistFlag=0 562 DEBUG_sys=false IGCM_sys_IsFileArchived $1 563 if [ $? = 0 ] ; then 564 finalPosition=$( mfls $1 2>/dev/null | wc -l ) 565 [ ${finalPosition} -eq 4 ] && ExistFlag=1 || ExistFlag=0 566 else 567 ExistFlag=$( [ -f $1 ] && echo 0 || echo 1 ) 568 fi 564 569 565 570 IGCM_debug_PopStack "IGCM_sys_TestFileArchive" … … 567 572 return ${ExistFlag} 568 573 } 569 570 574 571 575 #D-#================================================== … … 668 672 fi 669 673 670 \mfls - r$@674 \mfls -R $@ 671 675 672 676 IGCM_debug_PopStack "IGCM_sys_Tree"
Note: See TracChangeset
for help on using the changeset viewer.