Blog post - Implementando uma Toy Programming Language

filter_def

filter = { _array, _func:
    map( map(_array, _func), { _item:
        if ( _item, {
            _item
        });
    });
};

for_def

for = { number, block:
    _i = 0;
    while { i < number:
        _i++;
        block(_i - 1)
    }
}

for_use

a = [];
for(10, { i :
    *a[i] = i
});

if

if = { _op, _true, _false:
    _op && _true() || _false()
};

if_sample

k = 0;
if ( x == 2, {
    *k = 2
}, {
    *k = 3
});

map_def

map = { _array, func:
    _x = len(_array);
    while { _x > 0:
        _x--;
        _func(_array[_x - 1])
    }
};

pessoa

Pessoa = Class({
    nome = "";
    falar = { texto:
        print(texto);
    };
});

p = Pessoa("Rafael Caricio");
print( p("nome") );
p("falar")("Hello world!");

while

i = 10;
while { i > 0:
    print( i );
    *i--
};