diff --git a/tools/chibi-genstatic b/tools/chibi-genstatic index abe7f13f..0fcb7b5e 100755 --- a/tools/chibi-genstatic +++ b/tools/chibi-genstatic @@ -124,7 +124,7 @@ (display "(ctx sexp_api_pass(NULL, 1), env);\n")) (define (main args) - (find-c-libs (if (pair? (cdr args)) (cadr args) "lib")) + (find-c-libs (if (and (pair? args) (pair? (cdr args))) (cadr args) "lib")) (newline) (for-each include-c-lib c-libs) (newline)