more fortran problems

more fortran problems

[Mathew Yeates]

I am dealing with an array of logicals.
With the line
if (Tau_mask(itau,imix)) then

I  type
(gdb) set Tau_mask(itau,imix) = .TRUE.
(gdb) print Tau_mask(itau,imix)
.TRUE.
.

but the code below the "if" statement isnt executed.

So, now I'm trying set the memory location.
(gdb) print &Tau_mask
$6 = (PTR TO -> ( logical(kind=4) (*,*))) 0x2859630
(gdb) set (int)0x2859630=.TRUE.
Left operand of assignment is not an lvalue

What am I doing wrong?

-Mathew

Re: more fortran problems

[Michael Snyder]

Mathew Yeates wrote:

> So, now I'm trying set the memory location.
> (gdb) print &Tau_mask
> $6 = (PTR TO -> ( logical(kind=4) (*,*))) 0x2859630
> (gdb) set (int)0x2859630=.TRUE.
> Left operand of assignment is not an lvalue
> 
> What am I doing wrong?

This is not unique to Fortran.  The usual gdb syntax for this would be

    set *(int *) 0x2859630= [...]

Re: more fortran problems

[Mathew Yeates]

yeah, I finally got it. And now the code below the "if" statement is
being executed!

So .... this works but is kind of ugly. Maybe gdb is computing the
address incorrectly?

-Mathew

On Fri, Sep 17, 2010 at 5:02 PM, Michael Snyder <msnyder@vmware.com> wrote:
> Mathew Yeates wrote:
>
>> So, now I'm trying set the memory location.
>> (gdb) print &Tau_mask
>> $6 = (PTR TO -> ( logical(kind=4) (*,*))) 0x2859630
>> (gdb) set (int)0x2859630=.TRUE.
>> Left operand of assignment is not an lvalue
>>
>> What am I doing wrong?
>
> This is not unique to Fortran.  The usual gdb syntax for this would be
>
>   set *(int *) 0x2859630= [...]
>
>

Re: more fortran problems

[Doug Evans]

On Fri, Sep 17, 2010 at 5:02 PM, Michael Snyder <msnyder@vmware.com> wrote:
> Mathew Yeates wrote:
>
>> So, now I'm trying set the memory location.
>> (gdb) print &Tau_mask
>> $6 = (PTR TO -> ( logical(kind=4) (*,*))) 0x2859630
>> (gdb) set (int)0x2859630=.TRUE.
>> Left operand of assignment is not an lvalue
>>
>> What am I doing wrong?
>
> This is not unique to Fortran.  The usual gdb syntax for this would be
>
>   set *(int *) 0x2859630= [...]

[for reference sake]

There's also the gdb extension:  set {int} 0x2859630 = [...]

Re: more fortran problems

[Doug Evans]

On Mon, Sep 20, 2010 at 10:18 AM, Doug Evans <dje@google.com> wrote:
> On Fri, Sep 17, 2010 at 5:02 PM, Michael Snyder <msnyder@vmware.com> wrote:
>> Mathew Yeates wrote:
>>
>>> So, now I'm trying set the memory location.
>>> (gdb) print &Tau_mask
>>> $6 = (PTR TO -> ( logical(kind=4) (*,*))) 0x2859630
>>> (gdb) set (int)0x2859630=.TRUE.
>>> Left operand of assignment is not an lvalue
>>>
>>> What am I doing wrong?
>>
>> This is not unique to Fortran.  The usual gdb syntax for this would be
>>
>>   set *(int *) 0x2859630= [...]
>
> [for reference sake]
>
> There's also the gdb extension:  set {int} 0x2859630 = [...]

Heh, except this extension doesn't seem to have been added to the
fortran parser.
[I don't know fortran well enough to say that it's a good idea though.]