But the Common Lisp dialect also "has evolved from the original Lisp and differs from the latter in several important ways, including static scoping for variable binding and permitting functions to yield functions as values".
But with an effort to be backwarts (sic!) compatible. Code moved from Maclisp to ZetaLisp to Common Lisp.
One can write (mapcar (function (lambda (...) ...)) ...), but the (dolist (...) ...) is still there. Even PROG is still there.
For Scheme code needed to be rewritten, especially since Scheme changed more: syntax, different macro system, different control flow, different control flow abstractions, less built-in features, old features added back by libraries, ...
:)