codepad
[
create a new paste
]
login
|
about
Language:
C
C++
D
Haskell
Lua
OCaml
PHP
Perl
Plain Text
Python
Ruby
Scheme
Tcl
q a b c = putStrLn $ b ++ [toEnum 10,'q','('] ++ show b ++ [','] ++ show c ++ [','] ++ show a ++ [')'] main=q "q a b c = putStrLn $ b ++ [toEnum 10,'q','('] ++ show b ++ [','] ++ show c ++ [','] ++ show a ++ [')']" "def q(a,b,c)rint b+chr(10)+'q('+repr(+','+repr(c)+','+repr(a)+')'" "def e( return 34.chr+x+34.chr endef q(a,b,c) print b+10.chr+'main=q '+e(+' '+e(c)+' '+e(a)+' '+10.chr end"
Private
[
?
]
Run code
Submit