From 10122f8f80239846f2444e2774f8138c97cc79b1 Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Wed, 6 Feb 2008 15:03:00 +0000 Subject: [PATCH] Nothing special needed in extern-alien-name. --- tools/cross-scripts/cross-sparc-sparc.lisp | 3 --- 1 file changed, 3 deletions(-) diff --git a/tools/cross-scripts/cross-sparc-sparc.lisp b/tools/cross-scripts/cross-sparc-sparc.lisp index 8973f8b92..5154e5ace 100644 --- a/tools/cross-scripts/cross-sparc-sparc.lisp +++ b/tools/cross-scripts/cross-sparc-sparc.lisp @@ -213,9 +213,6 @@ (in-package :vm) (defun extern-alien-name (name) (declare (type simple-string name)) - #+(and bsd (not elf)) - (concatenate 'string "_" name) - #-(and bsd (not elf)) name) (export 'extern-alien-name) (export 'fixup-code-object) -- GitLab