Skip to content

Commit b8cc475

Browse files
committed
Whitespace fixes
1 parent b747355 commit b8cc475

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

lisp.fs

+2-2
Original file line numberDiff line numberDiff line change
@@ -197,7 +197,7 @@ end-struct lisp-compound
197197
: lisp-eval-list recursive ( lisp -- lisp )
198198
dup 0<> if
199199
dup car lisp-eval swap cdr lisp-eval-list cons
200-
endif ;
200+
endif ;
201201

202202
: lisp-bind-var ( name value -- )
203203
>r dup symbol-namea @ swap symbol-nameu @ r> symtab-add ;
@@ -363,7 +363,7 @@ defer lisp-read-lisp
363363
car ;
364364

365365
s" quote" string-new ' lisp-special-quote special symtab-add
366-
366+
367367
: lisp-special-lambda ( lisp -- lisp )
368368
dup car swap cdr car compound ;
369369

0 commit comments

Comments
 (0)