From 25cb0ad32ff197092262c74e944d254e901632bd Mon Sep 17 00:00:00 2001 From: sterni Date: Wed, 19 Jan 2022 14:39:58 +0100 Subject: style(3p/lisp): expand tabs in npg, mime4cl and sclf Done using find third_party/lisp/{sclf,mime4cl,npg} \ -name '*.lisp' -or -name '*.asd' \ -exec bash -c 'expand -i -t 8 "$0" | sponge "$0"' {} \; Change-Id: If84afac9c1d5cbc74e137a5aa0ae61472f0f1e90 Reviewed-on: https://cl.tvl.fyi/c/depot/+/5066 Tested-by: BuildkiteCI Reviewed-by: sterni --- third_party/lisp/npg/examples/python.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'third_party/lisp/npg/examples/python.lisp') diff --git a/third_party/lisp/npg/examples/python.lisp b/third_party/lisp/npg/examples/python.lisp index 68d794ddec03..a45ac614f716 100644 --- a/third_party/lisp/npg/examples/python.lisp +++ b/third_party/lisp/npg/examples/python.lisp @@ -38,7 +38,7 @@ (deflazy define-grammar (let ((*package* #.*package*) - (*compile-print* (and parser::*debug* t))) + (*compile-print* (and parser::*debug* t))) (reset-grammar) (format t "~&creating Python grammar...~%") (populate-grammar) @@ -80,8 +80,8 @@ (defrule statement-list := (+ simple-statement ";") :reduce (if (cdr $1) - (cons :statement-list $1) - (car $1))) + (cons :statement-list $1) + (car $1))) (defrule statement := statement-list eol -- cgit 1.4.1