parser/clojure/init.lua

   1 require'lpeg'
   2 local lpeg = lpeg
   3 local P, S = lpeg.P, lpeg.S
   4
   5 local macro_prefix =
   6         P'#' * ('?' * P'@'^-1 + '_')^-1 +
   7         S"^@`'"
   8
   9 local opposite = {
  10         ['('] = ')',
  11         [')'] = '(',
  12         ['{'] = '}',
  13         ['}'] = '{',
  14         ['['] = ']',
  15         [']'] = '[',
  16         ['"'] = '"',
  17         [';'] = '\n',
  18         ['\n']  = ';',
  19 }
  20
  21 return {
  22         prefix = macro_prefix,
  23         opposite = opposite,
  24 }