1 (in-package "COMMON-LISP")
3 ;; These are convenience packages that export JS and browser DOM
4 ;; symbols. If you :use the packages in a package FOO and then
5 ;; obfuscate FOO, it will prevent the JS symbols from getting
8 ;; For most web development tasks, you want to import PS-JS-SYMBOLS,
9 ;; PS-WINDOW-WD-SYMBOLS (which includes DOM level 2 and the w3c Window
10 ;; working draft), and possibly the PS-DOM-NONSTANDARD-SYMBOLS.
12 (defpackage "PS-JS-SYMBOLS"
15 #:encode-u-r-i-component
27 (defpackage "PS-DOM1-SYMBOLS"
28 (:use
"COMMON-LISP") ;; ensure we don't have naming collisions w/symbols defined in CL
42 #:create-document-fragment
45 #:create-C-D-A-T-A-Section
46 #:create-processing-instruction
48 #:create-entity-reference
49 #:get-elements-by-tag-name
113 #:remove-attribute-node
114 #:get-elements-by-tag-name
121 ;;; Level 1 extended interfaces (XML)
139 ;; processing instruction
145 ;; HTMLcollection/live NodeList
172 #:get-elements-by-name
174 ;; generic HTML element
182 ;; HTML document root
381 ;; div, p, and h1/h2/hn
552 ;; thead, tfoot, tbody
624 (defpackage "PS-DOM2-SYMBOLS"
625 (:use
"PS-DOM1-SYMBOLS" "COMMON-LISP")
631 #:create-document-type
633 ;; document interface
635 #:create-attribute-n-s
638 #:get-elements-by-tag-name-n-s
652 #:remove-named-item-n-s
658 #:get-attribute-node-n-s
659 #:get-elements-by-tag-name-n-s
661 #:remove-attribute-n-s
663 #:set-attribute-node-n-s
665 ;;; Level 2 extended interfaces
673 ;; object, frame, iframe
744 ;; css style declaration
750 #:get-property-c-s-s-value
751 #:get-property-priority
762 ;; css primitive value
768 #:get-r-g-b-color-value
803 #:create-c-s-s-style-sheet
805 ;;; CSS 2.0 extended interface
809 #:background-attachment
812 #:background-position
816 #:border-bottom-color
817 #:border-bottom-style
818 #:border-bottom-width
867 #:list-style-position
931 ;; event target interface
935 #:remove-event-listener
937 ;; event listener interface
955 ;; document event interface
981 ;; mutation event interface
989 #:init-mutation-event
993 (defpackage "PS-WINDOW-WD-SYMBOLS"
994 ;;; The window object (w3c working draft)
995 (:use
"PS-DOM2-SYMBOLS" "COMMON-LISP")
1002 ;; location interface
1032 (defpackage "PS-DOM-NONSTANDARD-SYMBOLS"
1033 ;;; Non-standard (incl. DOM level 0) but useful