HCoop
/
clinton
/
parenscript.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Lisp-2 removal (part one)
[clinton/parenscript.git]
/
src
/
package.lisp
diff --git
a/src/package.lisp
b/src/package.lisp
index
3106bdc
..
4e04212
100644
(file)
--- a/
src/package.lisp
+++ b/
src/package.lisp
@@
-32,7
+32,7
@@
#:>>>
#:< #:> #:<= #:>=
#:in
#:>>>
#:< #:> #:<= #:>=
#:in
- #:
eql #:
== #:!= #:=
+ #:== #:!= #:=
#:=== #:!==
#:&
#:^
#:=== #:!==
#:&
#:^
@@
-42,6
+42,9
@@
#:>>= #:<<=
#:*= #:/= #:%= #:+= #:\&= #:^= #:\|= #:~=
#:incf #:decf
#:>>= #:<<=
#:*= #:/= #:%= #:+= #:\&= #:^= #:\|= #:~=
#:incf #:decf
+
+ ;; compile-time stuff
+ #:eval-when
;; body forms
#:progn
;; body forms
#:progn
@@
-72,10
+75,6
@@
#:psetf
#:setq
#:psetq
#:psetf
#:setq
#:psetq
- #:simple-let*
- #:simple-let
- #:lexical-let*
- #:lexical-let
#:let*
#:let
#:let*
#:let
@@
-114,7
+113,6
@@
;; function definition
#:defun
#:lambda
;; function definition
#:defun
#:lambda
- #:flet
#:labels
;; lambda lists
#:labels
;; lambda lists
@@
-182,9
+180,29
@@
#:concatenate
#:concat-string
#:length
#:concatenate
#:concat-string
#:length
- #:null
+ #:defined
+ #:undefined
#:@
#:@
-
+ #:chain
+ #:with-lambda
+ #:stringp
+ #:numberp
+ #:functionp
+ #:objectp
+ #:memoize
+ #:append
+ #:apply
+ #:destructuring-bind
+
+ ;; DOM accessing utils
+ #:inner-html
+ #:uri-encode
+ #:attribute
+ #:offset
+ #:scroll
+ #:inner
+ #:client
+
;; js runtime utils
#:*ps-lisp-library*
#:mapcar
;; js runtime utils
#:*ps-lisp-library*
#:mapcar
@@
-197,15
+215,18
@@
))
(defparameter *parenscript-interface-exports*
'(;; compiler
))
(defparameter *parenscript-interface-exports*
'(;; compiler
+ #:*js-target-version*
#:compile-script
#:ps
#:compile-script
#:ps
+ #:ps-to-stream
#:ps-doc
#:ps-doc*
#:ps*
#:ps-doc
#:ps-doc*
#:ps*
- #:ps1*
#:ps-inline
#:ps-inline*
#:ps-inline
#:ps-inline*
-
+ #:*ps-read-function*
+ #:ps-compile-file
+ #:ps-compile-stream
;; for parenscript macro definition within lisp
#:defpsmacro
#:defmacro/ps
;; for parenscript macro definition within lisp
#:defpsmacro
#:defmacro/ps
@@
-245,41
+266,107
@@
))
(defparameter *javascript-exports*
))
(defparameter *javascript-exports*
- '(;; for representing js code as s-expressions
- #:?
- #:if
- #:unary-operator
+ '(;;; for representing js code as s-expressions
+
+ ;; operators
+ ; arithmetic
+ #:+
+ #:-
+ #:*
+ #:/
+ #:%
+
+ ; bitwise
+ #:&
+ #:|\||
+ #:^
+ #:~
+ #:>>
+ #:<<
+ #:>>>
+
+ ; assignment
+ #:=
+ #:+=
+ #:-=
+ #:*=
+ #:/=
+ #:%=
+ #:&=
+ #:\|=
+ #:^+
+ #:>>=
+ #:<<=
+ #:>>>=
+
+ ; increment/decrement
+ #:++
#:--
#:--
+
+ ; comparison
+ #:==
+ #:===
+ #:!=
+ #:!==
+ #:>
+ #:>=
+ #:<
+ #:<=
+
+ ; logical
+ #:&&
+ #:||||
#:!
#:!
+
+ ; misc
+ #:? ; ternary
+ #:|,|
+ #:delete
+ #:function
+ #:get
+ #:in
+ #:instanceof
+ #:new
+ #:this
+ #:typeof
+ #:void
+ #:null
+
+
+ ;; statements
#:block
#:block
- #:literal
#:break
#:continue
#:break
#:continue
+ #:do-while
+ #:for
+ #:for-in
+ #:if
+ #:label
#:return
#:return
+ #:switch
#:throw
#:throw
+ #:try
+ #:var
+ #:while
+ #:with
+
+
+ #:unary-operator
+ #:literal
#:array
#:aref
#:array
#:aref
- #:++
- #:+=
#:operator
#:operator
- #:-=
- #:-
- #:=
#:cond
#:lambda
#:object
#:variable
#:slot-value
#:cond
#:lambda
#:object
#:variable
#:slot-value
- #:new
- #:funcall
- #:instanceof
- #:in
#:escape
))
)
(defpackage "PARENSCRIPT"
#:escape
))
)
(defpackage "PARENSCRIPT"
- (:use "COMMON-LISP")
+ (:use "COMMON-LISP"
"ANAPHORA"
)
(:nicknames "JS" "PS")
#.(cons :export *parenscript-lang-exports*)
#.(cons :export *parenscript-interface-exports*)
(:nicknames "JS" "PS")
#.(cons :export *parenscript-lang-exports*)
#.(cons :export *parenscript-interface-exports*)