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

Reply via email to