(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)
I don't think anyone ever proposed it for Common Lisp. There's already two
ways to enter decimal data: prefixing with #10R or appending a decimal
point. And since decimal is required to be the default radix, it's rarely
necessary to specify it explicitly (MacLisp defaulted to octal, so the
decimal point was used frequently).
--
Barry Margolin
BBN PlaNET, Cambridge, MA
bar...@bbnplanet.com
Phone (800) 632-7638 - Fax (617) 873-6351