Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Mumps V1 issues with Fileman: Issue 2

150 views
Skip to first unread message

Sam Habiel

unread,
May 23, 2013, 4:55:07 PM5/23/13
to
Mumps V1 does not properly execute this line:

N S @("DFN(DFL)=$O("_DFR(DFL)_"DFN(DFL)))")

The error is ,Z58,: too much indirection.

Sam

cais....@gmail.com

unread,
May 24, 2013, 1:49:29 AM5/24/13
to
Sam

The question :

What is value of DFL,DFR(DFL) and DFN(DFL) ??

With simple value , working perfect on MV1.
Josef

cais....@gmail.com

unread,
May 24, 2013, 1:58:09 AM5/24/13
to
... and this code-line is correct ?
Because , after NEW /clear Stack/ all local-variable is UNDEFINED !

rtweed

unread,
May 24, 2013, 5:28:23 AM5/24/13
to
I would fully concur with the conclusions of the error message!

Rob

Sam Habiel

unread,
May 24, 2013, 11:50:13 AM5/24/13
to
Rob,

This is just one example. Code constructions like this are very common in Fileman. The reason they exist is that the core of Fileman was written in the late 70's to early 80's. Some parts (like %DT) are late 60's code. Keep in mind which Mumps standard was being used. The subscript indirection syntax was added to the Mumps standard specifically because of these issues.

Sam

Bill Gunshannon

unread,
May 24, 2013, 12:13:09 PM5/24/13
to
In article <0f4ff93b-f239-454a...@googlegroups.com>,
Sam Habiel <sam.h...@gmail.com> writes:
> Rob,
> This is just one example. Code constructions like this are very common in Fileman. The reason they exist is that the core of Fileman was written in the late 70's to early 80's. Some parts (like %DT) are late 60's code. Keep in mind which Mumps standard was being used. The subscript indirection syntax was added to the Mumps standard specifically because of these issues.
> Sam

Maybe it is some subtlty of Mumps that I haven't grasped yet but I come
up with unbalanced "()" in the posted example.

bill

> On Friday, May 24, 2013 2:28:23 AM UTC-7, rtweed wrote:
>> I would fully concur with the conclusions of the error message!
>>
>>
>>
>> Rob
>>
>>
>>
>> On Thursday, 23 May 2013 21:55:07 UTC+1, Sam Habiel wrote:
>>
>> > Mumps V1 does not properly execute this line:
>>
>> >
>>
>> >
>>
>> >
>>
>> > N S @("DFN(DFL)=$O("_DFR(DFL)_"DFN(DFL)))")
>>
>> >
>>
>> >
>>
>> >
>>
>> > The error is ,Z58,: too much indirection.
>>
>> >
>>
>> >
>>
>> >
>>
>> > Sam

--
Bill Gunshannon | de-moc-ra-cy (di mok' ra see) n. Three wolves
bill...@cs.scranton.edu | and a sheep voting on what's for dinner.
University of Scranton |
Scranton, Pennsylvania | #include <std.disclaimer.h>

Rod Dorman

unread,
May 24, 2013, 2:14:33 PM5/24/13
to
In article <b09hsl...@mid.individual.net>,
Bill Gunshannon <bill...@cs.uofs.edu> wrote:
> ...
>Maybe it is some subtlty of Mumps that I haven't grasped yet but I come
>up with unbalanced "()" in the posted example.

It depends upon the value of DFR(DFL)

Assume for the moment that
DFL=5
DFR(5)="ABC("
DFN(5)=10
ABC(20)="X"

Then S @("DFN(DFL)=$O("_DFR(DFL)_"DFN(DFL)))")
is S DFN(DFL)=$O(ABC(DFN(DFL)))
i.e. S DFN(5)=$O(ABC(10))
thus setting DFN(5) to 20

--
-- Rod --
rodd(at)polylogics(dot)com

Ray Newman

unread,
May 24, 2013, 6:18:39 PM5/24/13
to
I get M6, Undefined local variable (which is what the error should be) on my system (MUMPS V1.61).

Ray Newman

Rod Dorman

unread,
May 28, 2013, 1:52:13 PM5/28/13
to
In article <a6464660-f673-4edc...@googlegroups.com>,
Ray Newman <r...@woopwoop.com> wrote:
>On Friday, 24 May 2013 06:55:07 UTC+10, Sam Habiel wrote:
>> Mumps V1 does not properly execute this line:
>>
>> N S @("DFN(DFL)=$O("_DFR(DFL)_"DFN(DFL)))")
>>
>> The error is ,Z58,: too much indirection.
>
>I get M6, Undefined local variable (which is what the error should be) on my
>system (MUMPS V1.61).

What were the values of DFL, DFR(DFL), and DFN(DFL)?

Sam Habiel

unread,
May 28, 2013, 4:40:49 PM5/28/13
to
DFL is 2

+6^DITR> W DFR(DFL)
^UTILITY(U,$J,DDF(1),D0,"1",

DFN(DFL) is 0.

Sam

Sam Habiel

unread,
May 28, 2013, 5:18:41 PM5/28/13
to
Also,

DDF(1)=.84, U="^", D0=101

Sam

Ray Newman

unread,
May 28, 2013, 7:54:56 PM5/28/13
to
S DFL=2,DFR(DFL)="^UTILITY(U,$J,DDF(1),D0,""1"",",DDF(1)=.84,U="^",D0=101,DFN(DFL)=0 S @("DFN(DFL)=$O("_DFR(DFL)_"DFN(DFL)))") W "*",DFN(DFL),"*",$SY
**50,MUMPS V1.62 for Darwin x86_64 Built May 27 2013 at 11:38:59

Works here...

Ray

Sam Habiel

unread,
May 29, 2013, 3:49:29 PM5/29/13
to
Okay. I have 1.61. Time to upgrade and try again.

Sam

Sam Habiel

unread,
Jul 16, 2013, 1:50:32 PM7/16/13
to
Mr. Newman,

I confirmed that this is fixed over the weekend.

I will work on making changes to MV1 to fix the issues with closing $P and then try to find a solution to the Function keys issue.

Sam
0 new messages