From 334ec2121325089584c2035152b8519159a88631 Mon Sep 17 00:00:00 2001 From: Justine Tunney Date: Mon, 13 Dec 2021 07:40:04 -0800 Subject: [PATCH] FIx clang issue --- lisp.js | 32 +++++++++++++++++--------------- 1 file changed, 17 insertions(+), 15 deletions(-) diff --git a/lisp.js b/lisp.js index f5cd9c0..cd1a4ea 100755 --- a/lisp.js +++ b/lisp.js @@ -239,24 +239,26 @@ function Funtrace(f, l, x, a) { } function Indent(i) { - if (!i) return; - PrintChar(Ord(' ')); - Indent(i - 1); + if (i) { + PrintChar(Ord(' ')); + Indent(i - 1); + } } function Dump(a) { - if (!a) return; - Dump(Cdr(a)); - PrintChar(Ord('(')); - Print(kDefine); - PrintChar(Ord(' ')); - Print(Car(Car(a))); - PrintChar(Ord(' ')); - PrintChar(Ord('.')); - PrintChar(Ord(' ')); - Print(Cdr(Car(a))); - PrintChar(Ord(')')); - PrintChar(Ord('\n')); + if (a) { + Dump(Cdr(a)); + PrintChar(Ord('(')); + Print(kDefine); + PrintChar(Ord(' ')); + Print(Car(Car(a))); + PrintChar(Ord(' ')); + PrintChar(Ord('.')); + PrintChar(Ord(' ')); + Print(Cdr(Car(a))); + PrintChar(Ord(')')); + PrintChar(Ord('\n')); + } } function LoadBuiltins() {