11 The LINK-LOAD Package

lisp-name-to-foreign-name

Function

Package

link-load

Syntax

lisp-name-to-foreign-name name &key language

Arguments

name: A symbol representing a Lisp name. (Strings are passed unchanged through the function.)
language: If:C then an equivalent 'C' name is produced.:FORTRAN is an alternative.

Description

This function provides an equivalent foreign name for a Lisp name, depending on the keyword language.

Values

A string is returned which is a foreign equivalent of the Lisp name supplied. If name is a string, the function returns the string unchanged. If language is a symbol, the 'C' version replaces occurrences of '-' with '_' and adds a leading underscore. The Fortran version replaces occurrences of '-' with '_' and adds a leading and trailing underscore.

Example

(lisp-name-to-foreign-name 'lisp-name-with-hyphens)
"_lisp_name_with_hyphens"

See Also
: get-foreign-symbol