[metatilities-base-devel] Problem with CL-Markdown on CCL

[Eitarow Fukamachi]

Hi. I found a problem on CCL.

I tried CL-Markdown's extension feature while reading the User Guide
(https://github.com/gwkkwg/cl-markdown/blob/master/website/source/user-guide.md).

CL-USER> (ql:quickload :cl-markdown)
CL-USER> (markdown:markdown "Today is {today}. It is {now}." :format
:html :stream t)

And then, I got this error.

Undefined function METABANG.UTILITIES:FIXNUMP called with arguments (0) .
   [Condition of type CCL::UNDEFINED-FUNCTION-CALL]

A symbol "metabang.utilities:fixnump" seemed to be externed but it
wasn't assigned any functions.

I looked into metatilities, reached a function "fixnump" in dev/l0-utils.lisp,
and found it was blanked out on CCL.

#-(or openmcl digitool ccl) ; already has this
(defun fixnump (arg)
  "Same as (typep arg 'fixnum).  A lot of Explorer code was written using this,
and it's easier to implement it than to change them all."
  (typep arg 'fixnum))

CCL has CCL:FIXNUMP actually, but it is never imported anywhere.

--
Eitarow Fukamachi
https://github.com/fukamachi