主题:[讨论]命令行debug
yuanhuzhouni
[专家分:260] 发布于 2010-09-06 11:51:00
由于我程序中有getarg函数,需要在命令行下读入参数,不可以直接使用IDE的调试功能,请问如何在命令行下调试程序呢?
我试着按照帮助文件中提供的方法,但还是不能读入参数,高手帮帮忙把!
另外,我使用的是CVF6.6。
--------------------------
integer::n
character(10)::name
n=1
call getarg(n,name)
print *,name
end
回复列表 (共11个回复)
11 楼
zhanghuaa [专家分:20] 发布于 2010-09-25 22:28:00
看看以下:
C CHARACTER*20 BUFFER
C INTEGER*4 NUMARGS,STATUS
C numargs=nargs()
C call getarg(1,buffer,status)
C NAM1=BUFFER
C numargs=nargs()
C call getarg(2,buffer,status)
C NAM2=BUFFER
C WRITE(*,*)
C WRITE(*,'(A\)') '-DO YOU SURE YOUR INPUT-FILE NAME IS---!'
C WRITE(*,'(A)') NAM1
C WRITE(*,*) '(if it is no please press Ctrl+C !!! )'
C read(*,*)
C OPEN(1,FILE=NAM1,STATUS='unknown')
C WRITE(*,*)
C WRITE(*,*)
C WRITE(*,'(A\)') '-DO YOU SURE YOUR OUT-FILE NAME IS----!'
C WRITE(*,'(A)') NAM2
C OPEN(2,FILE=NAM2,STATUS='unknown')
我来回复