|
From: <kin...@us...> - 2003-11-16 16:26:06
|
Update of /cvsroot/teem/teem/src
In directory sc8-pr-cvs1:/tmp/cvs-serv16086
Modified Files:
names.pl
Log Message:
API CHANGE: removed nrrdUnwrap: this was just a wrapper around nrrdNix, and nothing in teem uses it. Nice to have as a pair for nrrdWrap, but its still fat, so it goes
Index: names.pl
===================================================================
RCS file: /cvsroot/teem/teem/src/names.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** names.pl 13 Jan 2003 23:48:07 -0000 1.2
--- names.pl 16 Nov 2003 16:25:19 -0000 1.3
***************
*** 1,3 ****
- #!/usr/bin/perl -w
# GK uses this to make sure that there are no filename clashes between
--- 1,2 ----
***************
*** 9,17 ****
#
# cd src
! # ls -1 {air,hest,biff,ell,nrrd,unrrdu,dye,moss,gage,bane,limn,hoover,mite,ten,echo}/*.c | ./names.pl | sort | more
while (<>) {
chomp;
($dir, $name) = split '/', $_, 2;
! print "$name $dir\n";
}
--- 8,17 ----
#
# cd src
! # ls -1 {air,hest,biff,ell,nrrd,unrrdu,dye,moss,gage,bane,limn,hoover,mite,alan,ten,echo}/*.c | perl names.pl | sort | wc -l
! # ls -1 {air,hest,biff,ell,nrrd,unrrdu,dye,moss,gage,bane,limn,hoover,mite,alan,ten,echo}/*.c | perl names.pl | sort | uniq | wc -l
while (<>) {
chomp;
($dir, $name) = split '/', $_, 2;
! print "$name\n";
}
|