fix CommonLispSourceGenerator constructor