The laziest Lisp lexer in history.

lexer.js

function lexer(code) {
  var strings = [],
      normalize = function(code) {
        return code.replace(/\(/g, " ( ")
                   .replace(/\)/g, " ) ")
                   .replace(/\s\s*/g, " ")
                   .replace(/^\s*/g, "")
                   .replace(/\s*$/g, "");
      };
  code = code.replace(/(".*?")/g, function(str) { return "ç" + (strings.push(str) - 1) + "ç"; });
  code = normalize(code)
         .replace(/([a-zA-Zñ_\-\+\?\*\>\<\/\%=#]\S*)/g, "\"$1\"")
         .replace(/ç(\d)ç/g, "strings[$1]")
         .replace(/\(\s*/g, "[")
         .replace(/\s*\)/g, "]")
         .split(" ").join(", ");
  return eval(code);
}

Caveats:

• Can't handle " inside strings

What does this thing do?

It's just a silly lexer. For example:

lexer('((lambda (a b) (+ a b)) 12 "buenos días")')

gives you:

[["lambda",["a","b"],["+","a","b"]],12,"\"buenos días\""]