mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 14:00:21 +02:00
Code Activity

* simpos.c (SYSTNAME): Add case for AIX; otherwise it won't

Browse source 
compile.  I have a feeling this function is a bad idea anyway ---
one should always test for features, not systems.
This commit is contained in:
Jim Blandy 1997-01-07 23:11:51 +00:00
parent 239294dafd
commit 10a12f9fb4
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

10
libguile/simpos.c
View file

@ -93,6 +93,16 @@ scm_getenv(nam)
return (val) ? scm_makfromstr(val, (scm_sizet)strlen(val), 0) : SCM_BOOL_F;
}
/* I have a feeling this whole arrangement below is a bad idea. One
should always test for the presence or absence of a particular
feature, instead of checking the system name. Older versions of a
system may lack features posessed by new ones, and a feature
appearing on one system will soon appear on others. And autoconf
provides the mechanisms for detecting features. -JimB */
#ifdef _AIX
# define SYSTNAME "AIX"
#endif
#ifdef vms
# define SYSTNAME "VMS"
#endif