X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/7e55d0998646666923cc31c5c86dd13be95fba87..1224dfb0bfbd3a4dfa062cd56ae9f72c960d8e1a:/src/c-types-impl.lisp

diff --git a/src/c-types-impl.lisp b/src/c-types-impl.lisp
index 56eee89..59225b2 100644
--- a/src/c-types-impl.lisp
+++ b/src/c-types-impl.lisp
@@ -501,8 +501,7 @@
 		  ~:>"
 	  (c-type-subtype type)
 	  (mapcar (lambda (arg)
-		    (if (eq arg :ellipsis)
-			arg
+		    (if (eq arg :ellipsis) arg
 			(list (argument-name arg) (argument-type arg))))
 		  (c-function-arguments type))))
 
@@ -552,8 +551,7 @@
    That is, with each argument name passed through
    `commentify-argument-name'."
   (mapcar (lambda (arg)
-	    (if (eq arg :ellipsis)
-		arg
+	    (if (eq arg :ellipsis) arg
 		(make-argument (commentify-argument-name (argument-name arg))
 			       (argument-type arg))))
 	  arguments))