changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / lisp/lib/cli/tests/shell.lisp

changeset 689: 2e7d93b892a5
child: 38e9c3be2392
author: Richard Westhaver <ellis@rwest.io>
date: Tue, 01 Oct 2024 22:29:08 -0400
permissions: -rw-r--r--
description: cli shell tests init
1 ;;; shell.lisp --- Shell Reader Tests
2 
3 ;;
4 
5 ;;; Code:
6 (in-package :cli/tests)
7 (in-suite :cli)
8 
9 (defparameter *shell-test-fn* #$ls #,*default-pathname-defaults* $#)
10 
11 (deftest shell-reader ()
12  (in-readtable :shell)
13  (is (functionp *shell-test-fn*)))