From 762816d2982d58e9a0b41a11655e093753aaad89 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Sat, 3 Nov 1990 15:37:57 +0000
Subject: [PATCH] Added exports for several functions that the backend need to
 get at.

---
 compiler/codegen.lisp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/compiler/codegen.lisp b/compiler/codegen.lisp
index 9d2e49f20..bb3193ddc 100644
--- a/compiler/codegen.lisp
+++ b/compiler/codegen.lisp
@@ -16,6 +16,9 @@
 ;;;
 (in-package 'c)
 
+(export '(component-header-length sb-allocated-size current-nfp-tn
+	  callee-nfp-tn callee-return-pc-tn *code-segment* *elsewhere*))
+
 ;;;; Utilities used during code generation.
 
 ;;; Component-Header-Length   --  Interface
@@ -47,7 +50,6 @@
 	    (block-environment block)))
       (ir2-component-nfp (component-info (block-component block)))))))
 
-
 ;;; CALLEE-NFP-TN  --  Interface
 ;;;
 (defun callee-nfp-tn (2env)
-- 
GitLab