Post Reply 
Programming puzzles: processing lists!
06-14-2017, 11:49 AM
Post: #154
RE: Programming puzzles: processing lists!
ALLPOS

Code:
\<<
  \-> o
  \<<
    1.
    \<< o == NSUB IFT \>>
    DOSUBS
  \>>
\>>

or, when no match returns an empty resultlist:

Code:
\<<
  \-> o
  \<<
    {} SWAP
    1.
    \<< o == NSUB IFT \>>
    DOSUBS
  \>>
  IF DUP SIZE THEN + END
\>>

Cheers, Werner

41CV†,42S,48GX,49G,DM42,DM41X,17BII,15CE,DM15L,12C,16CE
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: Programming puzzles: processing lists! - Werner - 06-14-2017 11:49 AM



User(s) browsing this thread: 2 Guest(s)