[PD-cvs] externals/zexy/src alias, NONE, 1.1 makealias.sh, NONE, 1.1 Makefile, 1.16, 1.17 a2l.c, 1.5, 1.6

[IOhannes m zmölnig]

Update of /cvsroot/pure-data/externals/zexy/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22853/src

Modified Files:
	Makefile a2l.c 
Added Files:
	alias makealias.sh 
Log Message:
added an aliasing "system": only the master objects are kept in CVS;
aliases are copied (or linked) from the master objects


--- NEW FILE: alias ---
a2l	any2list
demultiplex~	demux~
demultiplex	demux
drip	unfold
list2int	l2i
list2symbol	l2s
lister	l
lpt	lp
multiplex~	mux~
multiplex	mux
symbol2list	s2l

Index: Makefile
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/src/Makefile,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -d -r1.16 -r1.17
*** Makefile	14 Mar 2007 09:08:55 -0000	1.16
--- Makefile	19 Mar 2007 15:56:56 -0000	1.17
***************
*** 90,94 ****
  	make -C $(TESTDIR)
  
! install: install-abs install-bin install-doc
  
  install-bin:
--- 90,104 ----
  	make -C $(TESTDIR)
  
! alias: alias-bin alias-abs
! 
! alias-bin: all
! 	./makealias.sh ../src/alias ../src ../reference
! 
! 
! alias-abs:
! 	./makealias.sh ../abs/alias ../abs
! 
! 
! install: all install-abs install-bin install-doc
  
  install-bin:

--- NEW FILE: makealias.sh ---
#!/bin/sh

EXTENSIONS=".pd -help.pd .pd_linux .pd_darwin .pd_freebsd .dll .b_i386 .l_ia64 .l_i386 .d_fat .d_i386 .d_ppc .m_i386" 

ALIASFILE=$1
shift

if [ "x$ALIASFILE" = "x-clean" ]
then
  CLEANMODE=yes
  ALIASFILE=$1
  shift
else
  CLEANMODE=
fi


if [ -e "${ALIASFILE}" ]; then :; else
 echo cannot find alias-file ${ALIASFILE}
 exit 1
fi


function debug() {
 :
# echo $@
}

function do_makealias() {
 if [ "x${CLEANMODE}" = "xyes" ]
 then
   if [ -e "$2" ]; then
    debug "removing alias $2"
    rm $2
   else
     debug "alias $2 does not exist"
   fi
 else
   debug "aliasing $1 to $2"
   ln -s $1 $2
 fi
}

function do_makealiases() {
  local dir
  local master
  local slave
  local extension

  dir=$1
  master=$2
  shift; shift

  if [ "x${master}" = "x" ]; then
  # no realname provided
    return
  fi

  if [ "x$@" = "x" ]; then
  # no aliases provided...
    return
  fi

  for extension in ${EXTENSIONS}
  do
#   echo "checking aliases for ${dir}/${master}${extension}"
   if [ -f "${dir}/${master}${extension}" ]
   then
     for slave in $@
     do
      do_makealias ${dir}/${master}${extension} ${dir}/${slave}${extension}
     done
   fi
  done
}

for d in $@
do
  if [ -d "$d" ]
  then
    debug "scanning directory $d for aliases"
    cat ${ALIASFILE} | while read line
    do
     do_makealiases $d $line
    done
  else
    echo "skipping non-directory $d"
  fi
done


Index: a2l.c
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/src/a2l.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** a2l.c	14 Mar 2007 09:08:55 -0000	1.5
--- a2l.c	19 Mar 2007 15:56:56 -0000	1.6
***************
*** 74,80 ****
  {
    
!   a2l_class = class_new(gensym("any2list"), (t_newmethod)a2l_new, 
  			      0, sizeof(t_a2l), 0, 0);
!   class_addcreator((t_newmethod)a2l_new, gensym("a2l"), 0);
  
  
--- 74,80 ----
  {
    
!   a2l_class = class_new(gensym("a2l"), (t_newmethod)a2l_new, 
  			      0, sizeof(t_a2l), 0, 0);
!   class_addcreator((t_newmethod)a2l_new, gensym("any2list"), 0);