diff --git a/tools/cross-scripts/cross-sparc-sparc.lisp b/tools/cross-scripts/cross-sparc-sparc.lisp index 8973f8b923469e43eb3c95f33af2232bead1a6ca..5154e5acefe3fe2b0b4796f9a6e280a0e0fbeac8 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)