Raymond Toy pushed to branch issue-435-add-core-math-lisp-support at cmucl / cmucl

Commits:

• cb19cf0d
  by Raymond Toy at 2026-02-27T10:13:35-08:00

  Update cmucl.pot
  

• 090e0ed2
  by Raymond Toy at 2026-02-27T10:13:44-08:00

  In atanh forgot to convert rationals to single-floats
  
  In atanh, for rational args, we were calling %atanhf with the rational
  arg.  We forgot to convert it to a single-float before the call.
  

2 changed files:

• src/code/irrat.lisp
• src/i18n/locale/cmucl.pot

Changes:

      ;; atanh is complex if |number| > 1

      (if (or (> number 1) (< number -1))

 	 (complex-atanh number)

-	 (%atanhf number)))

+	 (%atanhf (coerce number 'single-float))))

     ((single-float)

      (if (or (> number (coerce 1 '(dispatch-type number)))

 	     (< number (coerce -1 '(dispatch-type number))))

 msgid "Return the arc sine of NUMBER."

 msgstr ""

-#: src/code/irrat.lisp

-msgid "Execution of a form compiled with errors:~% ~S"

-msgstr ""

-

 #: src/code/irrat.lisp

 msgid "Return the arc cosine of NUMBER."

 msgstr ""