Subject: #D
From: Erik Naggum <erik@naggum.no>
Date: 1996/05/20
Newsgroups: comp.lang.lisp
Message-ID: <3041581537628095@arcana.naggum.no>


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)