diff options
Diffstat (limited to 'lisp/play/doctor.el')
| -rw-r--r-- | lisp/play/doctor.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/play/doctor.el b/lisp/play/doctor.el index 315c4cc11f7..702f053b25e 100644 --- a/lisp/play/doctor.el +++ b/lisp/play/doctor.el @@ -21,6 +21,12 @@ ;; along with GNU Emacs; see the file COPYING. If not, write to ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. +;;; Commentary: + +;; The single entry point `doctor', simulates a Rogerian analyst using +;; phrase-production techniques similar to the classic ELIZA demonstration +;; of pseudo-AI. + ;;; Code: (defun doctor-cadr (x) (car (cdr x))) |