Mercurial > hg > xemacs-beta

comparison src/make-src-depend @ 5126:2a462149bd6a ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge
author Ben Wing <ben@xemacs.org>
date Wed, 24 Feb 2010 19:04:27 -0600
parents 6f2158fa75ed
children 308d34e9f07d
comparison
equal deleted inserted replaced
5125:b5df3737028a 5126:2a462149bd6a
1 : #-*- Perl -*- 1 : #-*- Perl -*-
2 2
3 ### make-src-depend --- update the Makefile dependency information for XEmacs 3 ### make-src-depend --- update the Makefile dependency information for XEmacs
4 4
5 # Copyright (C) 1998 Free Software Foundation, Inc. 5 # Copyright (C) 1998 Free Software Foundation, Inc.
6 # Copyright (C) 2010 Ben Wing.
6 7
7 ## Author: Martin Buchholz <martin@xemacs.org> 8 ## Author: Martin Buchholz <martin@xemacs.org>
8 ## Maintainer: XEmacs Development Team 9 ## Maintainer: XEmacs Development Team
9 10
10 ## This file is part of XEmacs. 11 ## This file is part of XEmacs.
112 "; 113 ";
113 114
114 sub PrintDeps { 115 sub PrintDeps {
115 my $file = shift; 116 my $file = shift;
116 my $ofile = $file; $ofile =~ s/c$/o/; print "$ofile: "; 117 my $ofile = $file; $ofile =~ s/c$/o/; print "$ofile: ";
117 if (exists $uses{$file}{'lisp.h'}) {
118 delete $uses{$file}{@LISP_H};
119 $uses{$file}{'$(LISP_H)'} = 1;
120 }
121 # Note: If both config.h and lisp.h are dependencies, config.h got deleted
122 # by the last clause.
123 if (exists $uses{$file}{'config.h'}) { 118 if (exists $uses{$file}{'config.h'}) {
124 delete $uses{$file}{'config.h'}; 119 delete $uses{$file}{'config.h'};
125 $uses{$file}{'$(CONFIG_H)'} = 1; 120 $uses{$file}{'$(CONFIG_H)'} = 1;
121 }
122 if (exists $uses{$file}{'lisp.h'}) {
123 for my $x (@LISP_H) {
124 delete $uses{$file}{$x};
125 }
126 $uses{$file}{'$(LISP_H)'} = 1;
126 } 127 }
127 # Huge hack. With QUICK_BUILD, general.c has no dependence on 128 # Huge hack. With QUICK_BUILD, general.c has no dependence on
128 # general-slots.h but really should. 129 # general-slots.h but really should.
129 $uses{$file}{'general-slots.h'} = 1 if $file eq "general.c"; 130 $uses{$file}{'general-slots.h'} = 1 if $file eq "general.c";
130 print "@{[sort keys %{$uses{$file}}]}\n"; 131 print "@{[sort keys %{$uses{$file}}]}\n";