From 98918e04dc8835f5dd3c4634cbc246dc89037fe9 Mon Sep 17 00:00:00 2001
From: Solene Rapenne <solene@perso.pw>
Date: Thu, 11 Jul 2019 10:06:17 +0200
Subject: [PATCH] Fix output due to params/desc separation changes

---
 functions.lisp | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/functions.lisp b/functions.lisp
index ec754ef..f8d5912 100644
--- a/functions.lisp
+++ b/functions.lisp
@@ -148,8 +148,11 @@
               (format stream-out "~a~%~a~%" (+ 1 tries) params))
             nil))
 
-      (format t "~a	~A	~A	~A	~A	~A	~A	~A~%"
-              level fonction
+      (format t "~a	~A	~{~A ~}	~A	~A	~A	~A	~A~%"
+              level
+              fonction
+
+              ;; returns params without :desc keyword and associated value
               (let ((desc-pos (position :desc params)))
                 (if desc-pos
                     (remove nil