Because your loop is not valid. The assignment
d=r[c]
Is undetermined for relations. You are picking up the same (undetermined)
value every time the index is c1. The value just happens to be the
associated with c4 each time. To get the index/value pairings, you'll need
to use a supplier
s = r~supplier
On Sun, Oct 12, 2014 at 5:40 AM, Walter Pachl <[email protected]>
wrote:
> Why do I see c4~identityHash four times?
>
> /* REXX */
> Parse Version v
> Say 'Version' v
> c1=.circle~new(1); Say 'c1' c1~identityHash
> c2=.circle~new(2); Say 'c2' c2~identityHash
> c3=.circle~new(3); Say 'c3' c3~identityHash
> c4=.circle~new(4); Say 'c4' c4~identityHash
> r=.relation~of((c1,c2),(c3,c4),(c1,c2),(c2,c3),(c1,c4))
> Say r~items
> Do c over r for 300
> d=r[c]
> Say c~identityHash '->' d~identityHash
> End
> ::class circle
> ::attribute radius
> ::method init
> Use Arg r
> self~radius=r
>
> output:
> Version REXX-ooRexx_5.0.0(MT)_32-bit 6.05 10 Oct 2014
> c1 -2109429193
> c2 -2109431033
> c3 -2109432873
> c4 -2109434745
> 5
> -2109432873 -> -2109434745
> -2109431033 -> -2109432873
> -2109429193 -> -2109434745
> -2109429193 -> -2109434745
> -2109429193 -> -2109434745
>
> should this be entered as a ticket? Where??
> Walter Pachl
>
>
> ------------------------------------------------------------------------------
> Meet PCI DSS 3.0 Compliance Requirements with EventLog Analyzer
> Achieve PCI DSS 3.0 Compliant Status with Out-of-the-box PCI DSS Reports
> Are you Audit-Ready for PCI DSS 3.0 Compliance? Download White paper
> Comply to PCI DSS 3.0 Requirement 10 and 11.5 with EventLog Analyzer
> http://p.sf.net/sfu/Zoho
> _______________________________________________
> Oorexx-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
------------------------------------------------------------------------------
Meet PCI DSS 3.0 Compliance Requirements with EventLog Analyzer
Achieve PCI DSS 3.0 Compliant Status with Out-of-the-box PCI DSS Reports
Are you Audit-Ready for PCI DSS 3.0 Compliance? Download White paper
Comply to PCI DSS 3.0 Requirement 10 and 11.5 with EventLog Analyzer
http://p.sf.net/sfu/Zoho
_______________________________________________
Oorexx-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/oorexx-devel
