projects / binutils.git / blame
| Commit | Line | Data |
|---|---|---|
| e72afe26 ILT |
1 | $! |
| 2 | $! This file configures binutils for use with openVMS/Alpha | |
| 3 | $! We do not use the configure script, since we do not have /bin/sh | |
| 4 | $! to execute it. | |
| 5 | $! | |
| 6 | $! Written by Klaus K"ampf ([email protected]) | |
| 7 | $! | |
| 8 | $arch_indx = 1 + ((f$getsyi("CPU").ge.128).and.1) ! vax==1, alpha==2 | |
| 9 | $arch = f$element(arch_indx,"|","|VAX|Alpha|") | |
| 10 | $if arch .eqs. "VAX" | |
| 11 | $then | |
| 12 | $ write sys$output "Target VAX not supported." | |
| 13 | $ exit 2 | |
| 14 | $endif | |
| 15 | $! | |
| 16 | $! | |
| 17 | $! Generate config.h | |
| 18 | $! | |
| 19 | $ create []config.h | |
| 20 | /* config.h. Generated automatically by configure. */ | |
| 21 | /* config.in. Generated automatically from configure.in by autoheader. */ | |
| 22 | /* Is the type time_t defined in <time.h>? */ | |
| 23 | #define HAVE_TIME_T_IN_TIME_H 1 | |
| 24 | /* Is the type time_t defined in <sys/types.h>? */ | |
| 25 | #define HAVE_TIME_T_IN_TYPES_H 1 | |
| 26 | /* Does <utime.h> define struct utimbuf? */ | |
| 27 | #define HAVE_GOOD_UTIME_H 1 | |
| 28 | /* Whether fprintf must be declared even if <stdio.h> is included. */ | |
| 29 | #define NEED_DECLARATION_FPRINTF 1 | |
| 30 | /* Whether sbrk must be declared even if <unistd.h> is included. */ | |
| 31 | #undef NEED_DECLARATION_SBRK | |
| 32 | /* Do we need to use the b modifier when opening binary files? */ | |
| 33 | /* #undef USE_BINARY_FOPEN */ | |
| 34 | /* Define if you have the sbrk function. */ | |
| 35 | #define HAVE_SBRK 1 | |
| 36 | /* Define if you have the utimes function. */ | |
| 37 | #define HAVE_UTIMES 1 | |
| 38 | /* Define if you have the <fcntl.h> header file. */ | |
| 39 | #define HAVE_FCNTL_H 1 | |
| 40 | /* Define if you have the <stdlib.h> header file. */ | |
| 41 | #define HAVE_STDLIB_H 1 | |
| 42 | /* Define if you have the <string.h> header file. */ | |
| 43 | #define HAVE_STRING_H 1 | |
| 44 | /* Define if you have the <strings.h> header file. */ | |
| 45 | #define HAVE_STRINGS_H 1 | |
| 46 | /* Define if you have the <sys/file.h> header file. */ | |
| 47 | #define HAVE_SYS_FILE_H 1 | |
| 48 | /* Define if you have the <unistd.h> header file. */ | |
| 49 | #define HAVE_UNISTD_H 1 | |
| 50 | $ write sys$output "Generated `config.h'" | |
| 51 | $! | |
| 52 | $! | |
| 53 | $! Edit VERSION in makefile.vms | |
| 54 | $! | |
| 55 | $ edit/tpu/nojournal/nosection/nodisplay/command=sys$input - | |
| 56 | []makefile.vms /output=[]makefile.vms | |
| 57 | $DECK | |
| 58 | ! | |
| 59 | ! Get VERSION from Makefile.in | |
| 60 | ! | |
| 61 | mfile := CREATE_BUFFER("mfile", "Makefile.in"); | |
| 62 | rang := CREATE_RANGE(BEGINNING_OF(mfile), END_OF(mfile)); | |
| 63 | v_pos := SEARCH_QUIETLY('VERSION=', FORWARD, EXACT, rang); | |
| 64 | POSITION(BEGINNING_OF(v_pos)); | |
| 65 | vers := CURRENT_LINE; | |
| 66 | IF match_pos <> 0 THEN; | |
| 67 | file := CREATE_BUFFER("file", GET_INFO(COMMAND_LINE, "file_name")); | |
| 68 | rang := CREATE_RANGE(BEGINNING_OF(file), END_OF(file)); | |
| 69 | match_pos := SEARCH_QUIETLY('VERSION=', FORWARD, EXACT, rang); | |
| 70 | POSITION(BEGINNING_OF(match_pos)); | |
| 71 | ERASE_LINE; | |
| 72 | COPY_TEXT(vers); | |
| 73 | SPLIT_LINE; | |
| 74 | ENDIF; | |
| 75 | WRITE_FILE(file, GET_INFO(COMMAND_LINE, "output_file")); | |
| 76 | QUIT | |
| 77 | $ EOD | |
| 78 | $ write sys$output "Patched `makefile.vms'" |