Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix ffi type annotations

Browse source
This commit is contained in:
Alex Shinn 2020-05-31 23:39:55 +09:00
parent 6caca77426
commit 6f1cf6588f
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tools/chibi-ffi
View file

@ -1829,8 +1829,8 @@
(i 1)) (i 1))
(cond (cond
((null? ls)) ((null? ls))
((type-value (car ls)) ;; ((type-value (car ls))
(lp (cdr ls) i)) ;; (lp (cdr ls) i))
((eq? 'sexp (type-base (car ls))) ((eq? 'sexp (type-base (car ls)))
(lp (cdr ls) (+ i 1))) (lp (cdr ls) (+ i 1)))
((<= i 3) ((<= i 3)