Verified Commit a844698e authored by Vladimir Sedach's avatar Vladimir Sedach
Browse files

Stop :use-ing NAMED-READTABLES package

parent 43056c2c
......@@ -43,7 +43,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
(defvar *version* 2.7 "Parenscript compiler version.")
......
......@@ -41,7 +41,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
(defun warn-deprecated (old-name &optional new-name)
(warn 'simple-style-warning
......
......@@ -37,7 +37,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; lambda lists
......
......@@ -35,7 +35,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
;; These are convenience packages that export JS and browser DOM
;; symbols. If you :use the packages in a package FOO and then
......
......@@ -36,7 +36,7 @@
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
(defpackage #:ps-js
(:use)
......
......@@ -40,7 +40,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
(macrolet ((define-trivial-mappings (&rest mappings)
`(progn
......
......@@ -36,7 +36,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
(defvar *obfuscated-packages* (make-hash-table))
......
......@@ -39,7 +39,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
;;; PS operators and macros that aren't present in the Common Lisp
;;; standard but exported by Parenscript, and their Common Lisp
......
......@@ -55,7 +55,7 @@
(named-readtables:in-readtable :parenscript)
(defpackage #:parenscript
(:use #:cl #:anaphora #:named-readtables)
(:use #:cl #:anaphora)
(:nicknames #:ps)
(:export
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
......
......@@ -41,7 +41,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
(defvar *ps-print-pretty* t)
(defvar *indent-num-spaces* 4)
......
......@@ -39,7 +39,7 @@
;;; POSSIBILITY OF SUCH DAMAGE.
(in-package #:parenscript)
(in-readtable :parenscript)
(named-readtables:in-readtable :parenscript)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; arithmetic and logic
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment