Pregunta

This is a follow up to my get_command_argument() question.

I'm reading a command line argument (arg) into a Fortran program. Then I want to store the value of arg as an integer. ichar() doesn't do the job.

This seems kind of basic, so clearly I'm doing something wrong. Any hints?

program test_get_command_argument
   integer :: i,j
   character(len=32) :: arg

   i = 0
   do
       call get_command_argument(i,arg)
       if (LEN_TRIM(arg) == 0) EXIT

       write (*,*) trim(arg)
       i = i + 1
   end do

   j = ichar(arg)


end program
¿Fue útil?

Solución

You want to use the "internal files" capability. You should have a statement like read(arg,*) j. This will read the character variable arg as if it were a file and store the result into j.

Otros consejos

This isn't an answer but an extended comment:

That's a bizarre way to loop over the command line arguments. What's wrong with the straightforward and obvious

do i = 1, command_argument_count()
   call get_command_argument(i,arg)
   ! do funky stuff    
end do
Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow
scroll top