===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
zenlisp-2013.11.22/src/compilers/prolog.l-61-              (cond ((null (cdr e)) (list res))
zenlisp-2013.11.22/src/compilers/prolog.l:62:                    ((null (caddr (caar e)))
zenlisp-2013.11.22/src/compilers/prolog.l-63-                      (ls-env
##############################################
zenlisp-2013.11.22/zl.c-295-#define cadar(x) (Car[Cdr[Car[x]]])
zenlisp-2013.11.22/zl.c:296:#define caddr(x) (Car[Cdr[Cdr[x]]])
zenlisp-2013.11.22/zl.c-297-#define cdaar(x) (Cdr[Car[Car[x]]])
##############################################
zenlisp-2013.11.22/zl.c-1131-	if (Car[n] == S_closure) {
zenlisp-2013.11.22/zl.c:1132:		fix_closures_of(caddr(n), bindings);
zenlisp-2013.11.22/zl.c-1133-		ee = cdddr(n);
##############################################
zenlisp-2013.11.22/zl.c-1526-	args = cadr(n);
zenlisp-2013.11.22/zl.c:1527:	term = caddr(n);
zenlisp-2013.11.22/zl.c-1528-	if (cdddr(n) == NIL) {
##############################################
zenlisp-2013.11.22/zl.c-1554-		return wrong_arg_count(n);
zenlisp-2013.11.22/zl.c:1555:	if (cddr(m) != NIL && !is_alist(caddr(m)))
zenlisp-2013.11.22/zl.c-1556-		return error("lambda: bad environment",
zenlisp-2013.11.22/zl.c:1557:			caddr(m));
zenlisp-2013.11.22/zl.c-1558-	if (!symbolic(Car[m]) && !is_list_of_symbols(Car[m]))
##############################################
zenlisp-2013.11.22/zl.c-1611-
zenlisp-2013.11.22/zl.c:1612:	m = caddr(Bind_stack);	/* rest of environment */
zenlisp-2013.11.22/zl.c-1613-	if (m == NIL) return NIL;
##############################################
zenlisp-2013.11.22/zl.c-1618-	Tmp2 = NIL;
zenlisp-2013.11.22/zl.c:1619:	caddr(Bind_stack) = Cdr[m];
zenlisp-2013.11.22/zl.c-1620-	return Cdr[m];
##############################################
zenlisp-2013.11.22/zl.c-1625-
zenlisp-2013.11.22/zl.c:1626:	m = caddr(Bind_stack);
zenlisp-2013.11.22/zl.c-1627-	p = Car[m];
##############################################
zenlisp-2013.11.22/zl.c-1685-	cadr(Tmp2) = m;
zenlisp-2013.11.22/zl.c:1686:	caddr(Tmp2) = v;
zenlisp-2013.11.22/zl.c-1687-	cdddr(Tmp2) = e;
##############################################
zenlisp-2013.11.22/zl.c-1694-	Tmp2 = NIL;
zenlisp-2013.11.22/zl.c:1695:	return caddr(m); /* term */
zenlisp-2013.11.22/zl.c-1696-}
##############################################
zenlisp-2013.11.22/zl.c-1955-	cddr(n) = alloc(NIL, NIL);
zenlisp-2013.11.22/zl.c:1956:	caddr(n) = explode_string(counter_to_string(&Allocations, buf));
zenlisp-2013.11.22/zl.c-1957-	cdddr(n) = alloc(NIL, NIL);
##############################################
zenlisp-2013.11.22/zl.c-1996-	)
zenlisp-2013.11.22/zl.c:1997:		op = Specials[caddr(y)];
zenlisp-2013.11.22/zl.c-1998-	else
##############################################
zenlisp-2013.11.22/zl.c-2195-			n = cadr(Arg_stack);	/* Next member */
zenlisp-2013.11.22/zl.c:2196:			a = caddr(Arg_stack);	/* Place to append to */
zenlisp-2013.11.22/zl.c-2197-			m2 = aunsave(1);	/* Root of result list */
##############################################
zenlisp-2013.11.22/zl.c-2234-				Cdr[a] = alloc(NIL, NIL);
zenlisp-2013.11.22/zl.c:2235:				caddr(Arg_stack) = Cdr[a];
zenlisp-2013.11.22/zl.c-2236-				cadr(Arg_stack) = Cdr[n];
##############################################
zenlisp-2013.11.22/zl.c-2356-			pr(" ");
zenlisp-2013.11.22/zl.c:2357:			print(caddr(n));
zenlisp-2013.11.22/zl.c-2358-			if (Closure_form > 1 && cdddr(n) != NIL) {