mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-02 15:40:55 -08:00
Code Issues Projects Releases Packages Wiki Activity

GCC does not have "inline" extension when invoked in ANSI or STRICT mode.

Browse source
This commit is contained in:
jgarcia 2008-05-09 07:47:43 +00:00
parent 76479f7686
commit f10cae5563
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/h/object.h
View file

@ -701,7 +701,7 @@ union cl_lispunion {
/*
Type_of.
*/
#if defined(__cplusplus) || defined(__GNUC__)
#if defined(__cplusplus) || (defined(__GNUC__) && !defined(__STRICT_ANSI__))
static inline cl_type type_of(cl_object o) {
int i = IMMEDIATE(o);
return (i? (cl_type)i : (cl_type)(o->d.t));