OpenEuphoria

Re: Sequence depths please explain

• Posted by petelomax at blueyonder.co.uk Mar 28, 2002
• 402 views

try this:

type nested(sequence x)
	for i = 1 to length(x) do
		if sequence(x[i]) then return 1 end if
	end for
	return 0
end type

or swap return 0 & 1 and call it simple()

I recommend making it a type solely because it traps better when you
know something should be simple, not nested, or vice versa.

You can still just say, on any object,:

	if nested(thingy) then

or

	if simple(thingy) then


Pete