diff --git a/extra/lisp/parser/parser.factor b/extra/lisp/parser/parser.factor
index 1e37193d3a..8fadb00e65 100644
--- a/extra/lisp/parser/parser.factor
+++ b/extra/lisp/parser/parser.factor
@@ -34,6 +34,6 @@ string       = dquote ( escaped | !(dquote) . )*  dquote => [[ second >string ]]
 atom         = number
               | identifier
               | string
-list-item    = _ ( atom | s-expression ) _               => [[ second ]]
 s-expression = LPAREN (list-item)* RPAREN                => [[ second seq>cons ]]
+list-item    = _ ( atom | s-expression ) _               => [[ second ]]
 ;EBNF
\ No newline at end of file