codepad
[
create a new paste
]
login
|
about
Language:
C
C++
D
Haskell
Lua
OCaml
PHP
Perl
Plain Text
Python
Ruby
Scheme
Tcl
#!/usr/bin/ruby i = 0 stack = Array.new(30000){0} while c = STDIN.getc case c when '+' stack[i] += 1 when '-' stack[i] -= 1 when '>' i += 1 when '<' i -= 1 when '.' puts stack[i] when "," c = STDIN.getc when '[' puts "[" when ']' puts "]" end end
Private
[
?
]
Run code
Submit