#!/usr/bin/perl # # Programmer: Craig Stuart Sapp # Creation Date: Tue Oct 29 10:50:34 EST 2002 # Last Modified: Tue Oct 29 10:50:36 EST 2002 # Filename: mkprog # Syntax: perl 5 # $Smake: cp -f %f /usr/local/bin/ # # Description: Script to compile soundfile programs. # if (@ARGV != 1) { print "Usage: $0 program\n"; exit(1); } $program = $ARGV[0]; $program =~ s/\.[^\.]*$//; if (!-r "$program.cpp") { print "Error: cannot read program: $program.cpp\n"; exit(1); } print "Compling program: $program\n"; $LIBDIR = "/home/craig/soundfile/lib"; $library = "soundfile"; $INCDIR = "/home/craig/soundfile/include"; `rm -f $program`; `g++ -Wall -g -O6 -I$INCDIR -DLINUX -o $program $program.cpp -L$LIBDIR -l$library && strip $program`; if (-r $program) { print "$program was successfully compiled\n"; } else { print "There were errors generating the $program program.\n"; }