|
|
Initial revision
procedure main()
while line := read() do {
write(line)
write(repl(" ",bal('+-*/',,,line) - 1),"|")
}
end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.