problem with conditional breakpoints

problem with conditional breakpoints

[David Froger]

Hy,

I have a problem using conditional breakpoints (I'm new to gdb. It's a
really great software!). I write a little Fortran program to explain
it, given below.

Thanks for any reply and for your attention,

David

==> versions

$ gfortran -v
gcc version 4.3.2 (Ubuntu 4.3.2-1ubuntu12)

$ gdb -v
GNU gdb 6.8-debian
Copyright (C) 2008 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "i486-linux-gnu".


==> The bash and gdb commands are:

1. It works:

$ gfortran -g -o main.x main.f90
$ gdb ./main.x
(gdb) b 20 if i==2 && j==2

2. It works:

$ gfortran -g -o main.x main.f90
$ gdb ./main.x
(gdb) b 55 if i==2 && j==2

3. It doesn't work:

$ gfortran -g -o main.x main.f90
$ gdb ./main.x
(gdb) b addmat
(gdb) run
(gdb) b 55 if i==2 && j==2
A syntax error in expression, near `=2 && j==2'.


==> The Fortran 90 source file is:

!file: main.f90


!===================================================
program main
!sum two matrix S=A+B and print A,B,S
!===================================================

implicit none

integer,parameter:: nx=5, ny=3
integer:: i,j

real,dimension(nx,ny):: A,B,S
real:: lx=10., ly=20.

!fill the matrix A and B
do i = 1,nx
do j = 1,ny
   A(i,j) = real(i+j) !this is line 20 (breakpoint)
   B(i,j) = real(i*j)
enddo
enddo

!sum S=A+B
call addmat(S,A,B,nx,ny)

!print the matrx A, B and C
write(*,*) 'Matrice A='
call affMat(A,nx,ny)
write(*,*)

write(*,*) 'Matrice B='
call affMat(B,nx,ny)
write(*,*)

write(*,*) 'Matrice S='
call affMat(S,nx,ny)
write(*,*)

end program main


!===================================================
subroutine addmat(S,A,B,nx,ny)
!sum two matrix A and B: S=A+B
!===================================================

integer::nx,ny
real,dimension(nx,ny),intent(in):: A,B
real,dimension(nx,ny),intent(out):: S

do i = 1,nx
do j = 1,ny
   S(i,j) = A(i,j)+B(i,j) !this a line 55 (breakpoint)
enddo
enddo

end subroutine addmat


!===================================================
subroutine affMat(matrice,nx,ny)
!print a matrix with rows an columns
!===================================================

implicit none

integer nx, ny, i, j
real matrice
dimension matrice(nx,ny)
character(len=2) ny_char

write(ny_char,fmt='(i2)') ny

do i=1,nx
   write(*,fmt='('//ny_char//'f12.7)') ( matrice(i,j) , j=1,ny )
   !for instance, if ny=5, the previous line mean:
   !write(*,fmt='( 5f12.7)') ( matrice(i,j) , j=1,ny )
enddo

end subroutine affMat

Re: problem with conditional breakpoints

[Tom Tromey]

>>>>> "David" == David Froger <david.froger@gmail.com> writes:

David> 3. It doesn't work:
David> $ gfortran -g -o main.x main.f90
David> $ gdb ./main.x
David> (gdb) b addmat
David> (gdb) run
David> (gdb) b 55 if i==2 && j==2
David> A syntax error in expression, near `=2 && j==2'.

At this point the current language is fortran, so you need to use
fortran syntax.  Try "show language" at various points to see what is
going on.

Tom

Re: problem with conditional breakpoints

[David Froger]

Tom,

Thank you!! So the good command is:

(gdb) b 55 if ((i.eq.2).and.(j.eq.2))

David

2009/9/2 Tom Tromey <tromey@redhat.com>:
>>>>>> "David" == David Froger <david.froger@gmail.com> writes:
>
> David> 3. It doesn't work:
> David> $ gfortran -g -o main.x main.f90
> David> $ gdb ./main.x
> David> (gdb) b addmat
> David> (gdb) run
> David> (gdb) b 55 if i==2 && j==2
> David> A syntax error in expression, near `=2 && j==2'.
>
> At this point the current language is fortran, so you need to use
> fortran syntax.  Try "show language" at various points to see what is
> going on.
>
> Tom
>