1{$ifndef ALLPACKAGES}
2{$mode objfpc}{$H+}
3{$define allpackages}
4{$define no_parent}
5program fpmake;
6
7uses fpmkunit, sysutils, Classes;
8{$endif ALLPACKAGES}
9(*
10
11The include files are generated with the following commands:
12
13rm fpmake_proc.inc fpmake_add.inc ; /bin/ls -1 */fpmake.pp| while read file; do cleanedname=`dirname $file | sed -e 's+-+_+g'` ; if ! `grep -i "^procedure add_$cleanedname" $file >/dev/null` ; then printf 'procedure add_%s;\nbegin\n  with Installer do\n{$include %s}\nend;\n\n' $cleanedname $file >> fpmake_proc.inc; else printf '{$include %s}\n\n' $file >> fpmake_proc.inc; fi; echo "  add_$cleanedname;" >> fpmake_add.inc; done
14
15*)
16
17{$include fpmake_proc.inc}
18
19procedure add_packages(const ADirectory: string);
20
21begin
22{$include fpmake_add.inc}
23end;
24
25{$ifdef no_parent}
26begin
27  add_packages('');
28  Installer.Run;
29end.
30{$endif no_parent}
31
32