From 220548126a4c93a7205f78cabdda66ca77bae7dd Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 3 Apr 2022 10:03:42 -0700 Subject: drop SKIP-DATA-SOURCE function & unexport the symbol We don't invoke the restart programmatically anywhere at present. Signed-off-by: Sean Whitton --- src/data.lisp | 4 ---- src/package.lisp | 1 - 2 files changed, 5 deletions(-) diff --git a/src/data.lisp b/src/data.lisp index 36dc0ce..6ee793c 100644 --- a/src/data.lisp +++ b/src/data.lisp @@ -134,10 +134,6 @@ as, before being passed to implementations of REGISTER-DATA-SOURCE." (push pair *data-sources*) (push args *data-source-registrations*)))) -(defun skip-data-source (c) - (declare (ignore c)) - (invoke-restart 'skip-data-source)) - (defun reset-data-sources () "Forget all data sources registered in this Lisp image and items of string data obtained from data sources by this Lisp image. diff --git a/src/package.lisp b/src/package.lisp index 6ddb49a..d75047f 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -313,7 +313,6 @@ #:try-register-data-source #:register-data-source #:reset-data-sources - #:skip-data-source #:get-data-stream #:with-data-stream #:get-data-string -- cgit v1.2.3