Subject: #D
From: Erik Naggum <>
Date: 1996/05/20
Newsgroups: comp.lang.lisp
Message-ID: <>

Scheme has #D for decimal.  I have found this useful.  a simple way to
obtain this in CMUCL follows, but I wonder whether it will find its way
into the language, and also why it isn't if it was decided against.

(in-package :common-lisp)

(defun sharp-D (stream sub-char numarg)
  (ignore-numarg sub-char numarg)
  (sharp-r stream sub-char 10))

(set-dispatch-macro-character #\# #\D #'sharp-d)