Changeset 499 for branches/libIGCM_MPI_OpenMP
- Timestamp:
- 08/12/11 12:54:07 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/libIGCM_MPI_OpenMP/libIGCM_sys/libIGCM_sys_vargas.ksh
r498 r499 647 647 } 648 648 649 #D-#================================================== 650 #D-function IGCM_sys_Rm 651 #D-* Purpose: generic rm 652 #D-* Examples: 653 #D- 654 function IGCM_sys_Rm { 655 IGCM_debug_PushStack "IGCM_sys_Rm" -- $@ 656 if ( $DEBUG_sys ) ; then 657 echo "IGCM_sys_Rm :" $@ 658 fi 659 660 typeset RET 661 662 echo rm $@ > out_rsync 2>&1 663 \rm $@ >> out_rsync 2>&1 664 RET=$? 665 666 if [ ${RET} -gt 0 ] ; then 667 echo "IGCM_sys_Rm : error." 668 cat out_rsync 669 IGCM_debug_Exit "IGCM_sys_Rm" 670 fi 671 IGCM_debug_PopStack "IGCM_sys_Rm" 672 } 649 673 650 674 #D-#================================================== … … 711 735 fi 712 736 IGCM_debug_PopStack "IGCM_sys_Cp" 713 }714 715 #D-#==================================================716 #D-function IGCM_sys_Rm717 #D-* Purpose: generic rm718 #D-* Examples:719 #D-720 function IGCM_sys_Rm {721 IGCM_debug_PushStack "IGCM_sys_Rm" -- $@722 if ( $DEBUG_sys ) ; then723 echo "IGCM_sys_Rm :" $@724 fi725 726 typeset RET727 728 echo rm $@ > out_rsync 2>&1729 \rm $@ >> out_rsync 2>&1730 RET=$?731 732 if [ ${RET} -gt 0 ] ; then733 echo "IGCM_sys_Rm : error."734 cat out_rsync735 IGCM_debug_Exit "IGCM_sys_Rm"736 fi737 IGCM_debug_PopStack "IGCM_sys_Rm"738 737 } 739 738
Note: See TracChangeset
for help on using the changeset viewer.