|
1232
|
1 dnl aclocal.m4 -- extra macros for configuring Octave |
|
|
2 dnl |
|
|
3 dnl Copyright (C) 1995 John W. Eaton |
|
|
4 dnl |
|
|
5 dnl This file is part of Octave. |
|
|
6 dnl |
|
|
7 dnl Octave is free software; you can redistribute it and/or modify it |
|
|
8 dnl under the terms of the GNU General Public License as published by the |
|
|
9 dnl Free Software Foundation; either version 2, or (at your option) any |
|
|
10 dnl later version. |
|
|
11 dnl |
|
|
12 dnl Octave is distributed in the hope that it will be useful, but WITHOUT |
|
|
13 dnl ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
|
14 dnl FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
|
15 dnl for more details. |
|
|
16 dnl |
|
|
17 dnl You should have received a copy of the GNU General Public License |
|
|
18 dnl along with Octave; see the file COPYING. If not, write to the Free |
|
1315
|
19 dnl Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
|
1232
|
20 |
|
|
21 dnl See what libraries are used by the C++ compiler. Need this for |
|
|
22 dnl dynamic linking. |
|
|
23 dnl |
|
|
24 dnl Write a minimal program and compile it with -v. I don't know what |
|
|
25 dnl to do if your compiler doesn't have -v... |
|
|
26 dnl |
|
|
27 dnl OCTAVE_CXXLIBS() |
|
|
28 AC_DEFUN(OCTAVE_CXXLIBS, |
|
|
29 [AC_REQUIRE([AC_PROG_CXXCPP]) |
|
|
30 AC_REQUIRE([AC_PROG_CXX]) |
|
|
31 AC_MSG_CHECKING([for C++ libraries]) |
|
|
32 AC_CACHE_VAL(octave_cv_cxxlibs, |
|
|
33 [AC_LANG_SAVE |
|
|
34 AC_LANG_CPLUSPLUS |
|
|
35 XCXXFLAGS="$CXXFLAGS" |
|
|
36 CXXFLAGS="$XCXXFLAGS -v" |
|
|
37 export CXXFLAGS |
|
|
38 dnl |
|
|
39 dnl This may be too tricky and break with future autoconf releases, |
|
|
40 dnl but it works with version 2.3, even with the Ultrix /bin/sh. |
|
|
41 dnl |
|
|
42 dnl I don't think that stripping commas out of this will ever hurt. |
|
|
43 dnl |
|
|
44 coutput=`( AC_TRY_LINK([], [], []) ) AC_FD_CC>&1 | sed 's/,/ /g'` |
|
|
45 CXXFLAGS="$XCXXFLAGS" |
|
|
46 AC_LANG_RESTORE |
|
|
47 changequote(, )dnl |
|
|
48 dnl |
|
|
49 octave_cv_cxxlibs= |
|
|
50 lflags= |
|
|
51 want_arg= |
|
|
52 dnl |
|
|
53 for arg in $coutput; do |
|
|
54 if test x$want_arg = x; then |
|
|
55 want_arg= |
|
|
56 case $arg in |
|
|
57 /*.a) |
|
|
58 exists=false |
|
|
59 for f in $lflags; do |
|
|
60 if test x$arg = x$f; then |
|
|
61 exists=true |
|
|
62 fi |
|
|
63 done |
|
|
64 if $exists; then |
|
|
65 arg= |
|
|
66 else |
|
|
67 lflags="$lflags $arg" |
|
|
68 fi |
|
|
69 ;; |
|
|
70 -[LR]*) |
|
|
71 exists=false |
|
|
72 for f in $lflags; do |
|
|
73 if test x$arg = x$f; then |
|
|
74 exists=true |
|
|
75 fi |
|
|
76 done |
|
|
77 ;; |
|
|
78 -l*) |
|
|
79 if test x$arg = x-lang-c++; then |
|
|
80 arg= |
|
|
81 else |
|
|
82 lflags="$lflags $arg" |
|
|
83 fi |
|
|
84 ;; |
|
|
85 -u) |
|
|
86 want_arg=$arg |
|
|
87 ;; |
|
|
88 *) |
|
|
89 arg= |
|
|
90 ;; |
|
|
91 esac |
|
|
92 else |
|
|
93 want_arg= |
|
|
94 fi |
|
|
95 if test x$arg != x; then |
|
|
96 octave_cv_cxxlibs="$octave_cv_cxxlibs $arg" |
|
|
97 fi |
|
|
98 done |
|
|
99 dnl |
|
|
100 changequote([, ])]) |
|
|
101 AC_MSG_RESULT([$octave_cv_cxxlibs]) |
|
|
102 CXXLIBS="$octave_cv_cxxlibs" |
|
|
103 AC_SUBST(CXXLIBS)]) |
|
|
104 |
|
|
105 dnl See what libraries are used by the Fortran compiler. |
|
|
106 dnl |
|
|
107 dnl Write a minimal program and compile it with -v. I don't know what |
|
|
108 dnl to do if your compiler doesn't have -v... |
|
|
109 dnl |
|
|
110 dnl OCTAVE_FLIBS() |
|
|
111 AC_DEFUN(OCTAVE_FLIBS, |
|
|
112 [AC_MSG_CHECKING([for Fortran librarires]) |
|
|
113 AC_CACHE_VAL(octave_cv_flibs, |
|
|
114 [changequote(, )dnl |
|
|
115 echo " END" > conftest.f |
|
|
116 foutput=`${F77-f77} -v -o conftest conftest.f 2>&1` |
|
|
117 dnl |
|
|
118 dnl The easiest thing to do for xlf output is to replace all the commas |
|
|
119 dnl with spaces. Try to only do that if the output is really from xlf, |
|
|
120 dnl since doing that causes problems on other systems. |
|
|
121 dnl |
|
|
122 xlf_p=`echo $foutput | grep xlfentry` |
|
|
123 if test -n "$xlf_p"; then |
|
|
124 foutput=`echo $foutput | sed 's/,/ /g'` |
|
|
125 fi |
|
|
126 dnl |
|
|
127 ld_run_path=`echo $foutput | \ |
|
|
128 sed -n -e 's/.*\(LD_RUN_PATH *= *[^ ]*\).*/\1/p' | \ |
|
|
129 sed -e 's/LD_RUN_PATH *= *//'` |
|
|
130 dnl |
|
|
131 dnl We are only supposed to find this on Solaris systems, and this |
|
|
132 dnl substitution is probably only going to work with gcc on those |
|
|
133 dnl systems... |
|
|
134 dnl |
|
|
135 if test -n "$ld_run_path"; then |
|
|
136 ld_run_path="-Xlinker -R -Xlinker $ld_run_path" |
|
|
137 fi |
|
|
138 dnl |
|
|
139 flibs= |
|
|
140 lflags= |
|
|
141 dnl |
|
|
142 dnl If want_arg is set, we know we want the arg to be added to the list, |
|
|
143 dnl so we don't have to examine it. |
|
|
144 dnl |
|
|
145 want_arg= |
|
|
146 dnl |
|
|
147 for arg in $foutput; do |
|
|
148 old_want_arg=$want_arg |
|
|
149 want_arg= |
|
|
150 case "$old_want_arg" in |
|
|
151 '') |
|
|
152 case $arg in |
|
|
153 /*.a | /*values-X*.o) |
|
|
154 exists=false |
|
|
155 for f in $lflags; do |
|
|
156 if test x$arg = x$f; then |
|
|
157 exists=true |
|
|
158 fi |
|
|
159 done |
|
|
160 if $exists; then |
|
|
161 arg= |
|
|
162 else |
|
|
163 lflags="$lflags $arg" |
|
|
164 fi |
|
|
165 ;; |
|
|
166 -lang*) |
|
|
167 arg= |
|
|
168 ;; |
|
|
169 -[lLR]) |
|
|
170 want_arg=$arg |
|
|
171 arg= |
|
|
172 ;; |
|
|
173 -[lLR]*) |
|
|
174 exists=false |
|
|
175 for f in $lflags; do |
|
|
176 if test x$arg = x$f; then |
|
|
177 exists=true |
|
|
178 fi |
|
|
179 done |
|
|
180 if $exists || test x$arg = x-lm -o x$arg = x-lc; then |
|
|
181 arg= |
|
|
182 else |
|
|
183 lflags="$lflags $arg" |
|
|
184 fi |
|
|
185 ;; |
|
|
186 -u) |
|
|
187 want_arg=$arg |
|
|
188 ;; |
|
|
189 -Y) |
|
|
190 want_arg=$arg |
|
|
191 arg= |
|
|
192 ;; |
|
|
193 *) |
|
|
194 arg= |
|
|
195 ;; |
|
|
196 esac |
|
|
197 ;; |
|
|
198 -[lLR]) |
|
|
199 arg="$old_want_arg $arg" |
|
|
200 ;; |
|
|
201 -Y) |
|
|
202 dnl |
|
|
203 dnl Should probably try to ensure unique directory options here too. |
|
|
204 dnl This probably only applies to Solaris systems, and then will only |
|
|
205 dnl work with gcc... |
|
|
206 dnl |
|
|
207 arg=`echo $arg | sed -e 's%^P,%%'` |
|
|
208 SAVE_IFS=$IFS |
|
|
209 IFS=: |
|
|
210 list= |
|
|
211 for elt in $arg; do |
|
|
212 list="$list -L $elt" |
|
|
213 done |
|
|
214 IFS=$SAVE_IFS |
|
|
215 arg="$list" |
|
|
216 ;; |
|
|
217 esac |
|
|
218 dnl |
|
|
219 if test -n "$arg"; then |
|
|
220 flibs="$flibs $arg" |
|
|
221 fi |
|
|
222 done |
|
|
223 changequote([, ])dnl |
|
|
224 octave_cv_flibs="$ld_run_path $flibs"]) |
|
|
225 FLIBS="$octave_cv_flibs" |
|
|
226 AC_MSG_RESULT([$FLIBS])]) |
|
|
227 |
|
1257
|
228 dnl See if the Fortran compiler uses uppercase external names. |
|
|
229 dnl |
|
|
230 dnl OCTAVE_F77_UPPERCASE_NAMES() |
|
|
231 AC_DEFUN(OCTAVE_F77_UPPERCASE_NAMES, |
|
|
232 [AC_MSG_CHECKING([whether $F77 uses uppercase external names]) |
|
|
233 AC_CACHE_VAL(octave_cv_f77_uppercase_names, |
|
|
234 [octave_cv_f77_uppercase_names=no |
|
|
235 cat > conftest.f <<EOF |
|
|
236 subroutine xxyyzz () |
|
|
237 return |
|
|
238 end |
|
|
239 EOF |
|
|
240 if ${F77-f77} -c conftest.f 1>&AC_FD_CC 2>&AC_FD_CC; then |
|
|
241 if test "`${NM-nm} conftest.o | grep XXYYZZ`" != ""; then |
|
|
242 octave_cv_f77_uppercase_names=yes |
|
|
243 fi |
|
|
244 fi]) |
|
|
245 AC_MSG_RESULT([$octave_cv_f77_uppercase_names]) |
|
|
246 if test "$octave_cv_f77_uppercase_names" = yes; then |
|
|
247 AC_DEFINE(F77_UPPERCASE_NAMES, 1) |
|
|
248 fi]) |
|
|
249 |
|
1232
|
250 dnl See if the Fortran compiler appends underscores to external names. |
|
|
251 dnl |
|
|
252 dnl OCTAVE_F77_APPEND_UNDERSCORE() |
|
|
253 AC_DEFUN(OCTAVE_F77_APPEND_UNDERSCORE, |
|
|
254 [AC_MSG_CHECKING([whether $F77 appends underscores to external names]) |
|
1257
|
255 AC_REQUIRE([OCTAVE_F77_UPPERCASE_NAMES]) |
|
1232
|
256 AC_CACHE_VAL(octave_cv_f77_append_underscore, |
|
|
257 [octave_cv_f77_append_underscore=no |
|
|
258 cat > conftest.f <<EOF |
|
|
259 subroutine xxyyzz () |
|
|
260 return |
|
|
261 end |
|
|
262 EOF |
|
|
263 if ${F77-f77} -c conftest.f 1>&AC_FD_CC 2>&AC_FD_CC; then |
|
1257
|
264 if test "$octave_cv_f77_uppercase_names" = yes; then |
|
|
265 if test "`${NM-nm} conftest.o | grep XXYYZZ_`" != ""; then |
|
|
266 octave_cv_f77_append_underscore=yes |
|
|
267 fi |
|
|
268 else |
|
|
269 if test "`${NM-nm} conftest.o | grep xxyyzz_`" != ""; then |
|
|
270 octave_cv_f77_append_underscore=yes |
|
|
271 fi |
|
1232
|
272 fi |
|
|
273 fi]) |
|
|
274 AC_MSG_RESULT([$octave_cv_f77_append_underscore]) |
|
|
275 if test "$octave_cv_f77_append_underscore" = yes; then |
|
|
276 AC_DEFINE(F77_APPEND_UNDERSCORE, 1) |
|
|
277 fi]) |
|
|
278 |
|
|
279 dnl See if the Fortran compiler is compatible with f2c. |
|
|
280 dnl |
|
|
281 dnl Write a minimal program, compile it, and see if it works as |
|
|
282 dnl expected. |
|
|
283 dnl |
|
|
284 dnl OCTAVE_F2C_F77_COMPAT() |
|
|
285 AC_DEFUN(OCTAVE_F2C_F77_COMPAT, |
|
|
286 [AC_REQUIRE([OCTAVE_FLIBS]) |
|
|
287 AC_REQUIRE([OCTAVE_F77_APPEND_UNDERSCORE]) |
|
|
288 AC_MSG_CHECKING([$F77/f2c compatibility]) |
|
|
289 AC_CACHE_VAL(octave_cv_f2c_f77_compat, |
|
|
290 [trap 'rm -f ftest* ctest* core; exit 1' 1 3 15 |
|
|
291 octave_cv_f2c_f77_compat=no |
|
|
292 cat > ftest.f <<EOF |
|
|
293 INTEGER FUNCTION FORSUB (C, D) |
|
|
294 CHARACTER *(*) C |
|
|
295 INTEGER L |
|
|
296 DOUBLE PRECISION D |
|
|
297 L = LEN (C) |
|
|
298 WRITE (*, '(A,1X,I2)') C(1:L), INT (D) |
|
|
299 FORSUB = 1 |
|
|
300 RETURN |
|
|
301 END |
|
|
302 EOF |
|
|
303 ${F77-f77} -c ftest.f 1>&AC_FD_CC 2>&AC_FD_CC |
|
|
304 dnl |
|
|
305 changequote(, ) |
|
|
306 cat > ctest.c <<EOF |
|
|
307 #include "confdefs.h" |
|
|
308 static char s[14]; |
|
|
309 int main () |
|
|
310 { |
|
|
311 double d = 10.0; |
|
|
312 int len; |
|
|
313 strcpy (s, "FOO-I-HITHERE"); |
|
|
314 len = strlen (s); |
|
|
315 #ifdef F77_APPEND_UNDERSCORE |
|
|
316 return (! forsub_ (s, &d, len)); |
|
|
317 #else |
|
|
318 return (! forsub (s, &d, len)); |
|
|
319 #endif |
|
|
320 } |
|
|
321 #ifdef sun |
|
|
322 int MAIN_ () { return 0; } |
|
|
323 #endif |
|
|
324 EOF |
|
|
325 changequote([, ]) |
|
|
326 dnl |
|
|
327 if ${CC-cc} -c ctest.c 1>&AC_FD_CC 2>&AC_FD_CC; then |
|
|
328 if ${CC-cc} -o ctest ctest.o ftest.o $FLIBS -lm 1>&AC_FD_CC 2>&AC_FD_CC; then |
|
|
329 ctest_output=`./ctest 2>&1` |
|
|
330 status=$? |
|
|
331 if test $status -eq 0 && test "$ctest_output" = "FOO-I-HITHERE 10"; then |
|
|
332 octave_cv_f2c_f77_compat=yes |
|
|
333 fi |
|
|
334 fi |
|
|
335 fi]) |
|
|
336 rm -f ftest* ctest* core |
|
|
337 AC_MSG_RESULT([$octave_cv_f2c_f77_compat])]) |
|
1707
|
338 |
|
|
339 dnl The following test is from Karl Berry's Kpathseach library. I'm |
|
|
340 dnl including it here in case we someday want to make the use of |
|
|
341 dnl kpathsea optional. |
|
|
342 |
|
|
343 # Some BSD putenv's, e.g., FreeBSD, do malloc/free's on the environment. |
|
|
344 # This test program is due to Mike Hibler <mike@cs.utah.edu>. |
|
|
345 # We don't actually need to run this if we don't have putenv, but it |
|
|
346 # doesn't hurt. |
|
|
347 AC_MSG_CHECKING(whether putenv uses malloc) |
|
|
348 AC_CACHE_VAL(octave_cv_func_putenv_malloc, |
|
|
349 [AC_TRY_RUN([ |
|
|
350 #define VAR "YOW_VAR" |
|
|
351 #define STRING1 "GabbaGabbaHey" |
|
|
352 #define STRING2 "Yow!!" /* should be shorter than STRING1 */ |
|
|
353 extern char *getenv (); /* in case char* and int don't mix gracefully */ |
|
|
354 main () |
|
|
355 { |
|
|
356 char *str1, *rstr1, *str2, *rstr2; |
|
|
357 str1 = getenv (VAR); |
|
|
358 if (str1) |
|
|
359 exit (1); |
|
|
360 str1 = malloc (strlen (VAR) + 1 + strlen (STRING1) + 1); |
|
|
361 if (str1 == 0) |
|
|
362 exit (2); |
|
|
363 strcpy (str1, VAR); |
|
|
364 strcat (str1, "="); |
|
|
365 strcat (str1, STRING1); |
|
|
366 if (putenv (str1) < 0) |
|
|
367 exit (3); |
|
|
368 rstr1 = getenv (VAR); |
|
|
369 if (rstr1 == 0) |
|
|
370 exit (4); |
|
|
371 rstr1 -= strlen (VAR) + 1; |
|
|
372 if (strncmp (rstr1, VAR, strlen (VAR))) |
|
|
373 exit (5); |
|
|
374 str2 = malloc (strlen (VAR) + 1 + strlen (STRING2) + 1); |
|
|
375 if (str2 == 0 || str1 == str2) |
|
|
376 exit (6); |
|
|
377 strcpy (str2, VAR); |
|
|
378 strcat (str2, "="); |
|
|
379 strcat (str2, STRING2); |
|
|
380 if (putenv (str2) < 0) |
|
|
381 exit (7); |
|
|
382 rstr2 = getenv (VAR); |
|
|
383 if (rstr2 == 0) |
|
|
384 exit (8); |
|
|
385 rstr2 -= strlen (VAR) + 1; |
|
|
386 #if 0 |
|
|
387 printf ("rstr1=0x%x, rstr2=0x%x\n", rstr1, rstr2); |
|
|
388 /* |
|
|
389 * If string from first call was reused for the second call, |
|
|
390 * you had better not do a free on the first string! |
|
|
391 */ |
|
|
392 if (rstr1 == rstr2) |
|
|
393 printf ("#define SMART_PUTENV\n"); |
|
|
394 else |
|
|
395 printf ("#undef SMART_PUTENV\n"); |
|
|
396 #endif |
|
|
397 exit (rstr1 == rstr2 ? 0 : 1); |
|
|
398 }], octave_cv_func_putenv_malloc=yes, octave_cv_func_putenv_malloc=no, |
|
|
399 octave_cv_func_putenv_malloc=no)])dnl |
|
|
400 AC_MSG_RESULT($octave_cv_func_putenv_malloc) |
|
|
401 if test $octave_cv_func_putenv_malloc = yes; then |
|
|
402 AC_DEFINE(SMART_PUTENV) |
|
|
403 fi |
