speeding up json.el

["T. V. Raman" <raman@users.sf.net>]

Along the same lines as  th recently checkee in speed-up to
xml.el, json.el could  be sped up by using  syntax classes to
advantage. As a simple example:
At present:;

(defun json-skip-whitespace ()
  "Skip past the whitespace at point."
  (while (looking-at "[\t\r\n\f\b ]")
    (goto-char (match-end 0))))

replace with (skip-syntax-forward " ")

We could also get more aggressive by introducing a json grammar
specific syntax table, and using partial-parse-sexp  and friends
if needed.

-- 
Best Regards,
--raman

      
Email:  raman@users.sf.net
WWW:    http://emacspeak.sf.net/raman/
AIM:    emacspeak       GTalk: tv.raman.tv@gmail.com
PGP:    http://emacspeak.sf.net/raman/raman-almaden.asc
Google: tv+raman 
IRC:    irc://irc.freenode.net/#emacs