cis: check argument type to be real

This commit is contained in:
Marius Gerbershagen 2019-04-19 17:33:10 +02:00
parent ab35ce71a2
commit 06b8e49d89

View file

@ -128,6 +128,7 @@ zero. Otherwise, returns the value of (/ NUMBER (ABS NUMBER))"
"Args: (radians)
Returns a complex number whose realpart and imagpart are the values of (COS
RADIANS) and (SIN RADIANS) respectively."
(declare (ext:check-arguments-type))
(exp (* imag-one x)))
#-ecl-min