Coverage report: /home/ellis/comp/core/core.lisp

KindCoveredAll%
expression05 0.0
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 ;;; lisp/core.lisp --- CC Core Lisp
2
 
3
 ;; Top-level namespaces accessible to Core lisps.
4
 
5
 ;;; Code:
6
 (pkg:defpkg :core 
7
   (:use :cl)
8
   (:use-reexport :std :log :io :obj :net :cry :parse :dat :cl-user :sb-ext :sb-debug))
9
 (in-package :core)
10
 (pushnew :core *features*)
11
 
12
 ;; (defun exclamation-mark-reader (stream inchar)
13
 ;;   (declare (ignore inchar))
14
 ;;   (read stream))
15
 
16
 ;; (defun question-mark-reader (stream inchar)
17
 ;;   "Reader function for the #\? macro character in the :CORE readtable. Processes
18
 ;; a query from input STREAM."
19
 ;;   (declare (ignore inchar)))
20
 
21
 (defreadtable :core
22
   (:merge :modern :std :shell)
23
   ;; (:macro-char #\? #'question-mark-reader)
24
   ;; (:macro-char #\! #'exclamation-mark-reader)
25
   )
26
 
27
 (define-lisp-package :core)
28
 
29
 ;; (with-core-lisp