select-next - like select+skip, gets the value following the value following the key

gregg.irwin (Gregg Irwin) — Wed, 17 May 2006 01:40:33 GMT



    select-next: func [

    	"Like select, but gets the value following the value following the key"

    	series [series!]

    	key [any-type!]

    	/local pos

    ][

    	if pos: find series key [

    		first skip pos 2

    	]

    ]

DZone Snippets: select-next code

select-next - like select+skip, gets the value following the value following the key