diff options
Diffstat (limited to 'lang/scm/patches/patch-ag')
| -rw-r--r-- | lang/scm/patches/patch-ag | 90 |
1 files changed, 90 insertions, 0 deletions
diff --git a/lang/scm/patches/patch-ag b/lang/scm/patches/patch-ag new file mode 100644 index 00000000000..0b23cc4e2e9 --- /dev/null +++ b/lang/scm/patches/patch-ag @@ -0,0 +1,90 @@ +$NetBSD: patch-ag,v 1.1 2006/02/19 17:50:11 joerg Exp $ + +--- build.scm.orig 2006-02-19 17:31:59.000000000 +0000 ++++ build.scm +@@ -483,6 +483,7 @@ + (gnu-win32 i386 unix gcc ) ;gcc + (djgpp i386 ms-dos gcc ) ;gcc + (freebsd i386 unix cc ) ;cc ++ (dragonfly i386 unix cc ) ;cc + (gcc *unknown* unix gcc ) ;gcc + (highc i386 ms-dos hc386 ) ;bind386 + (hp-ux hp-risc hp-ux cc ) ;cc +@@ -647,6 +648,14 @@ + (dlll freebsd "-DSUN_DL" "-export-dynamic" "" () ()) + (nostart freebsd "" "-e start -dc -dp -Bstatic -lgnumalloc" #f ("pre-crt0.c") ()) + (dump freebsd "" "/usr/lib/crt0.o" "" ("unexsunos4.c") ()) ++ (c dragonfly "" "-export-dynamic" #f () ()) ++ (m dragonfly "" "-lm" #f () ()) ++ (curses dragonfly "" "-lncurses" "/usr/lib/libncurses.a" () ()) ++ (regex dragonfly "-I/usr/include/gnu" "-lgnuregex" "" () ()) ++ (editline dragonfly "" "-lreadline" "" () ()) ++ (dlll dragonfly "-DSUN_DL" "-export-dynamic" "" () ()) ++ (nostart dragonfly "" "-e start -dc -dp -Bstatic -lgnumalloc" #f ("pre-crt0.c") ()) ++ (dump dragonfly "" "/usr/lib/crt0.o" "" ("unexsunos4.c") ()) + (curses netbsd "-I/usr/pkg/include" "-lncurses" "-Wl,-rpath -Wl,/usr/pkg/lib -L/usr/pkg/lib" () ()) + (editline netbsd "-I/usr/pkg/include" "-lreadline" "-Wl,-rpath -Wl,/usr/pkg/lib -L/usr/pkg/lib" () ()) + (graphics netbsd "-I/usr/X11R6/include -DX11" "-lX11" "-Wl,-rpath -Wl,/usr/X11R6/lib -L/usr/X11R6/lib" () ()) +@@ -1626,6 +1635,62 @@ + (car (parameter-list-ref parms 'implvic)) + oname ".so")))) + ++(defcommand compile-c-files dragonfly ++ (lambda (files parms) ++ (and (batch:try-chopped-command ++ parms ++;;; gcc 3.4.2 for FreeBSD does not allow options other than default i.e. -O0 if NO -DGCC_SPARC_BUG - dai 2004-10-30 ++ ;;"cc" "-O3 -pipe -DGCC_SPARC_BUG " "-c" ++ "cc" "-O3 -pipe " "-c" ++ (c-includes parms) ++ (c-flags parms) ++ files) ++ (map c->o files)))) ++(defcommand link-c-program dragonfly ++ (lambda (oname objects libs parms) ++ (batch:rename-file parms ++ oname (string-append oname "~")) ++ (and (batch:try-command parms ++ "cc" "-o" oname ++ (must-be-first ++ '("-nostartfiles" ++ "pre-crt0.o" "crt0.o" ++ "/usr/lib/crt0.o") ++ (append objects libs))) ++ oname))) ++(defcommand compile-dll-c-files dragonfly ++ (lambda (files parms) ++ (and (batch:try-chopped-command ++ parms "cc" "-O3 -pipe " "-fPIC" "-c" ++ (c-includes parms) (c-flags parms) files) ++ (let ((fnames (truncate-up-to (map c-> files) #\/))) ++ (and (batch:try-command ++ parms "cc" "-shared" ++ (cond ++ ((equal? (car fnames) "edline") "-lreadline") ++ ((equal? (car fnames) "x") "-L/usr/X11R6/lib -lSM -lICE -lXext -lX11 -lxpg4") ++ (else "")) ++ "-o" (string-append (car fnames) ".so") ++ (map (lambda (fname) (string-append fname ".o")) fnames)) ++ (for-each (lambda (fname) ++ (batch:delete-file ++ parms (string-append fname ".o"))) ++ fnames) ++ (list (string-append (car fnames) ".so"))))))) ++(defcommand make-dll-archive dragonfly ++ (lambda (oname objects libs parms) ++ (and (batch:try-command ++ parms ++ "cc" "-shared" "-o" ++ (string-append ++ (car (parameter-list-ref parms 'implvic)) ++ oname ".so") ++ objects) ++ (batch:rebuild-catalog parms) ++ (string-append ++ (car (parameter-list-ref parms 'implvic)) ++ oname ".so")))) ++ + (defcommand compile-c-files darwin + (lambda (files parms) + (and (batch:try-chopped-command |