mmarco/kenzo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Type declaration should include NULL.

Browse Source
This commit is contained in:
Gerd Heber 2015-07-15 18:20:39 -05:00
parent 463522dc4c
commit f836b37aff
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ls-twisted-products.lisp
View File

@ -372,7 +372,7 @@
(multiple-value-bind (expn y-n+1 gp-n) (pop-first-absm n g-n) (multiple-value-bind (expn y-n+1 gp-n) (pop-first-absm n g-n)
(declare (declare
(fixnum expn) (fixnum expn)
(type absm y-n+1 gp-n)) (type (or absm null) y-n+1 gp-n))
(ecase expn (ecase expn
(0 (zero-cmbn (1+ n))) (0 (zero-cmbn (1+ n)))
(+1 (+1