diff --git a/stdlib/stdlib.lisp b/stdlib/stdlib.lisp
index 149eff4..a9c9b8c 100644
--- a/stdlib/stdlib.lisp
+++ b/stdlib/stdlib.lisp
@@ -5,9 +5,9 @@
         (do
             (define pivot (first l))
             (+
-                (qs (filter (lambda (n) (> pivot n)) l))
+                (quick-sort (filter (lambda (n) (> pivot n)) l))
                 (list pivot)
-                (qs (tail (filter (lambda (n) (<= pivot n)) l)))
+                (quick-sort (tail (filter (lambda (n) (<= pivot n)) l)))
             ))
     ))