• @JackLSauce
    link
    174 months ago

    That’s not Lisp…

    (while (== x y)
      (func1)
      (func2)
    )
    
        • 7heo
          link
          fedilink
          1
          edit-2
          4 months ago

          Hear me out: brainfuck, but with parentheses only.

          >    )))
          <    (((
          +    ())
          -    (()
          .    ()(
          ,    )()
          [    )((
          ]    ))(
          

          Hello world example:

          ()))(((()(())))(())(())))))()))))(()
          (()(()(()(()(((((())(((((()(()((((()
          (()(()))()))(()()()))))))))())()()))
          )))()(()(())())()))((()()))))(((((((
          ((((((()(())())())()((()(()(()(()(()
          (()()((((((((()()())))))))))))())()(
          

          Ancient aliens meme with the caption "LIPS!!"

          Python transpiler:

          #!/usr/bin/env python
          """Lipsfuck to brainfuck transpiler"""
          
          from sys import stdin
          
          OPS = {")))": '>', "(((": '<',
                 "())": '+', "(()": '-',
                 "()(": '.', ")()": ',',
                 ")((": '[', "))(": ']'}
          
          
          def main():
              """Obvious main procedure"""
              _d = ''.join(stdin.readlines()).rstrip('\n')
              for _op in [_d[x:x+3] for x in
                          range(0, int(len(_d)), 3)]:
                  print(OPS[_op], end='')
              print()
          
          
          if __name__ == "__main__":
              main()
          
    • flamingos-cant
      link
      fedilink
      English
      84 months ago

      What kind of monster writes lisp with the closing bracket on its own line.