root/NEWT0/trunk/sample/basicFns.newt

// Basic Global Functions


global Map(obj, fn)
begin
    foreach slot, value in obj do call fn with (slot,value);
end;


global DeepClone(obj)
begin
    obj := clone(obj);

    if isFrame(obj) or isArray(obj) then
        foreach slot,value in obj do obj.(slot) := DeepClone(value);

    return obj;
end;


global GetFunctionArgCount(fn)
begin
    return fn.numArgs;
end;


true;