;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;;
-;;;; $Id: functions.lisp,v 1.3 2002/10/14 01:51:15 kevin Exp $
+;;;; $Id: functions.lisp,v 1.4 2002/10/14 03:07:41 kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
,result-type
,@function-args)
#+sbcl
- `(sb-alien:def-alien-routine (,foreign-name ,lisp-name)
+ `(sb-alien:define-alien-routine (,foreign-name ,lisp-name)
,result-type
,@function-args)
#+lispworks