highlight-lisp/index.md
Andrew Danger Lyon e70e8ee47c mods
2013-03-20 23:06:41 -07:00

2.1 KiB

title layout
Highlighter demo default

highlight-lisp demo

HI!! Tired of boring and outdated looking Lisp code scaring away your website's visitors, costing you millions per year? Is the wife nagging you endlessly? Did some schmuck get your promotion at work?

Worry no more, your troubles are over!

Introducing highligh-lisp.js.

{* !!!WARNING!!! There is no going back! *}

;; known globals
*read-base*
(let* ((*package* nil)) 'random-symbol)   ; let/let*/lambda are "special"

;; known functions, unknown globals
(when (<= 17.69 (get-value))
  (incf *my-global-lol*))

;; number tests
;; all have class "number", but depending on type have integer, float, hex, binary
'(80 -69.4 +5 822342.287 #xf40d #b0101)

;; t/nil + strings
(format t "highlight-lisp.js sucksp: ~a~%" nil)

;; testing lambda-list specials (&key, &body, etc), multi-line strings,
;; constants, symbols, keywords
(defun test-me (lol &key omg (lol 'wtf))
  (let ((*global* 'ur-mom)
        (strings "r pretty kewl LOL")
        (multi-line-strings "can be kewl
            as well")
        (+my-constant+ "wait, constants don't change!!"))
    (make-instance 'error :message "OMG ERROR!!!")))

;; known vs unknown #'functions
(make-hash-table :test #'equal)
(make-hash-table :test #'equalzz)

;; testing known keywords (have class "known" as well as "keyword")
(loop for x being the :hash-keys of my-hash-table collect x)