summaryrefslogtreecommitdiffstats
path: root/sc2.c
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:24 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:24 -0800
commit1edcb9b62a1a520eddae8403c19d841c9b18737f (patch)
treebc0a43d9b3905726a76ed6f0528b54275f23d082 /sc2.c
parent5ca6e8e6a4e5c022a6fb5d28f30219c22c99eda8 (diff)
downloadscm-1edcb9b62a1a520eddae8403c19d841c9b18737f.tar.gz
scm-1edcb9b62a1a520eddae8403c19d841c9b18737f.zip
Import Upstream version 5b3upstream/5b3
Diffstat (limited to 'sc2.c')
-rw-r--r--sc2.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/sc2.c b/sc2.c
index 904458a..e72de95 100644
--- a/sc2.c
+++ b/sc2.c
@@ -147,10 +147,10 @@ SCM appendb(args)
tail:
if NULLP(args) return EOL;
arg = CAR(args);
- ASSERT(NULLP(arg) || (NIMP(arg) && CONSP(arg)), arg, ARG1, s_appendb);
args = CDR(args);
if NULLP(args) return arg;
if NULLP(arg) goto tail;
+ ASSERT(NIMP(arg) && CONSP(arg), arg, ARG1, s_appendb);
CDR(last_pair(arg)) = appendb(args);
return arg;
}