X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fhppa%2Fsanctify.lisp;h=fa0aa0fa9bc22b5ece1c77a9171af4d81193e482;hb=69e6aef5e6fb3bd682c7a2cbf774034d2ea58ee8;hp=fb25bae81cc78667002ea18a5f47c1e6ba5d3d99;hpb=8da864365c7e0137d6a92c91ff89202f1515e43f;p=sbcl.git diff --git a/src/compiler/hppa/sanctify.lisp b/src/compiler/hppa/sanctify.lisp index fb25bae..fa0aa0f 100644 --- a/src/compiler/hppa/sanctify.lisp +++ b/src/compiler/hppa/sanctify.lisp @@ -14,6 +14,7 @@ (in-package "SB!VM") +;;; FIXME-lav, can we do this in assembly instead ? (defun sanctify-for-execution (component) (without-gcing (alien-funcall (extern-alien "sanctify_for_execution"