From d244767e6d382b77cb5f8572a30a70cc41ea3cbb Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Wed, 27 Mar 2002 00:02:25 +0000
Subject: [PATCH] lilypond-1.3.69

---
 lily/include/auto-beam-engraver.hh          |  57 --------
 lily/include/clef-item.hh                   |  17 ---
 lily/include/multi-measure-rest-engraver.hh |   8 --
 lily/include/staff-bar.hh                   |  29 ----
 stepmake/bin/flower.py                      |  87 ------------
 stepmake/bin/show-latest.sh                 |  11 --
 stepmake/bin/table-to-html.py               | 149 --------------------
 stepmake/bin/tar-docxx.sh                   |  49 -------
 stepmake/bin/zet-step.sh                    |  18 ---
 9 files changed, 425 deletions(-)
 delete mode 100644 lily/include/auto-beam-engraver.hh
 delete mode 100644 lily/include/clef-item.hh
 delete mode 100644 lily/include/multi-measure-rest-engraver.hh
 delete mode 100644 lily/include/staff-bar.hh
 delete mode 100755 stepmake/bin/flower.py
 delete mode 100644 stepmake/bin/show-latest.sh
 delete mode 100644 stepmake/bin/table-to-html.py
 delete mode 100644 stepmake/bin/tar-docxx.sh
 delete mode 100755 stepmake/bin/zet-step.sh

diff --git a/lily/include/auto-beam-engraver.hh b/lily/include/auto-beam-engraver.hh
deleted file mode 100644
index b5aec56fb1..0000000000
--- a/lily/include/auto-beam-engraver.hh
+++ /dev/null
@@ -1,57 +0,0 @@
-/*   
-  auto-beam-engraver.hh -- declare Auto_beam_engraver
-  
-  source file of the GNU LilyPond music typesetter
-  
-  (c) 1999--2000 Jan Nieuwenhuizen <janneke@gnu.org>
-  
- */
-
-#ifndef AUTO_BEAM_ENGRAVER_HH
-#define AUTO_BEAM_ENGRAVER_HH
-
-#include "engraver.hh"
-
-class Auto_beam_engraver : public Engraver
-{
-public:
-  Auto_beam_engraver ();
-  VIRTUAL_COPY_CONS (Translator);
-
-protected:
-  virtual bool do_try_music (Music*);
-  virtual void do_pre_move_processing ();
-  virtual void do_post_move_processing ();
-  virtual void do_removal_processing ();
-  virtual void acknowledge_element (Score_element_info);
-  virtual void do_process_music ();
-  virtual void process_acknowledged ();
-  virtual void do_creation_processing ();
-private:
-  void begin_beam ();
-  void consider_end_and_begin (Moment test_mom);
-  Beam* create_beam_p ();
-  void end_beam ();
-  void junk_beam ();
-  bool same_grace_state_b (Score_element* e);
-  void typeset_beam ();
-
-  Moment shortest_mom_;
-  Beam *finished_beam_p_;
-  Array<Stem*>* stem_l_arr_p_;
-  
-  Moment last_add_mom_;
-  Moment extend_mom_;
-
-
-  Moment beam_start_moment_;
-  Moment beam_start_location_;
-  
-  Timing_translator * timer_l_;
-  // We act as if beam were created, and start a grouping anyway.
-  Beaming_info_list*grouping_p_;  
-  Beaming_info_list*finished_grouping_p_;
-};
-
-#endif /* AUTO_BEAM_ENGRAVER_HH */
-
diff --git a/lily/include/clef-item.hh b/lily/include/clef-item.hh
deleted file mode 100644
index a3f7c5ed44..0000000000
--- a/lily/include/clef-item.hh
+++ /dev/null
@@ -1,17 +0,0 @@
-/*
-  clef-item.hh -- declare Clef_item
-
-  (c) 1996--2000 Han-Wen Nienhuys
-*/
-
-#ifndef CLEFITEM_HH
-#define CLEFITEM_HH
-#include "item.hh"
-
-#include "direction.hh"
-
-
-
-#endif // CLEFITEM_HH
-
-
diff --git a/lily/include/multi-measure-rest-engraver.hh b/lily/include/multi-measure-rest-engraver.hh
deleted file mode 100644
index 951112c3ef..0000000000
--- a/lily/include/multi-measure-rest-engraver.hh
+++ /dev/null
@@ -1,8 +0,0 @@
-/*
-  multi_measure_rest-engraver.hh -- declare Multi_measure_rest_engraver
-
-  source file of the GNU LilyPond music typesetter
-
-  (c) 1998--2000 Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
diff --git a/lily/include/staff-bar.hh b/lily/include/staff-bar.hh
deleted file mode 100644
index 0932ef78a1..0000000000
--- a/lily/include/staff-bar.hh
+++ /dev/null
@@ -1,29 +0,0 @@
-/*   
-  staff-bar.hh -- declare Staff_bar
-  
-  source file of the GNU LilyPond music typesetter
-  
-  (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-  
- */
-
-#ifndef STAFF_BAR_HH
-#define STAFF_BAR_HH
-
-#include "bar.hh"
-
-
-/**
-   A bar that is on a staff.
-   Ugh. Entita non multiplicandum  ... 
- */
-class Staff_bar : public Bar
-{
-public:
-  VIRTUAL_COPY_CONS(Score_element);
-  virtual Real get_bar_size () const;
-  Staff_bar (SCM);
-};
-
-#endif /* STAFF_BAR_HH */
-
diff --git a/stepmake/bin/flower.py b/stepmake/bin/flower.py
deleted file mode 100755
index b105098ed3..0000000000
--- a/stepmake/bin/flower.py
+++ /dev/null
@@ -1,87 +0,0 @@
-#!@PYTHON@
-
-# 
-# flower.py -- python flower lib
-# 
-# source file of the GNU LilyPond music typesetter
-# 
-# (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
-# 
-
-import sys
-from string import *
-
-class File:
-    """silly wrapper for Python file object."""
-    def __init__ (self,nm, mode='r'):
-	if nm:
-	    self.file_ = open (nm, mode);
-	elif mode == 'w':
-	    self.file_ = sys.stdout
-	else:
-	    self.file_ = sys.stdin
-	    
-	self.eof_ = 0;
-    def readline (self):
-    	l=  self.file_.readline ();
-	if not l:
-	    self.eof_ = 1;
-	return l;
-    def write (self, str):
-    	self.file_.write (str)
-    def eof (self):
-	return self.eof_
-    def close (self):
-    	self.file_.close ()
-    def __del__ (self):
-    	self.close ();
-
-
-
-import fnmatch
-import os
-
-_debug = 0
-
-_prune = ['(*)']
-
-
-def my_find(patterns, dir = os.curdir):
-        list = []
-        names = os.listdir(dir)
-        names.sort()
-        for name in names:
-                if name in (os.curdir, os.pardir):
-                        continue
-                fullname = os.path.join(dir, name)
-		for pat in patterns:
-		    if fnmatch.fnmatch(name, pat):
-                        list.append(fullname)
-                if os.path.isdir(fullname) and not os.path.islink(fullname):
-                        for p in _prune:
-                                if fnmatch.fnmatch(name, p):
-                                        if _debug: print "skip", `fullname`
-                                        break
-                        else:
-                                if _debug: print "descend into", `fullname`
-				found = my_find(patterns, fullname)
-				if found:
-				    list = list + found
-        return list
-
-
-def multiple_find(pats, dirnames):
-    from find import find
-    l = []
-    for d in dirnames:
-	l = l + my_find(pats,  d)
-    return l
-
-def file_exist_b(name):
-    try: 
-	f = open(name)
-    except IOError:
-	return 0
-    f.close ()
-    return 1
-
diff --git a/stepmake/bin/show-latest.sh b/stepmake/bin/show-latest.sh
deleted file mode 100644
index 731efad9a3..0000000000
--- a/stepmake/bin/show-latest.sh
+++ /dev/null
@@ -1,11 +0,0 @@
-#!/bin/sh
-# show-latest.sh --- show latest lily
-
-# @PERL@ @step-bindir@/out/show-latest.pl --package=@package@ $*
-# urg
-#@step-bindir@/out/show-latest --the-package=@package@ $*
-if [ $# -lt 1 ]; then
-	print="-p"
-fi
-@abs-step-bindir@/out/package-latest --the-package=@package@ $* $print
-
diff --git a/stepmake/bin/table-to-html.py b/stepmake/bin/table-to-html.py
deleted file mode 100644
index 6cfc2f1c2d..0000000000
--- a/stepmake/bin/table-to-html.py
+++ /dev/null
@@ -1,149 +0,0 @@
-#!@PYTHON@
-
-# table-to-html.py -- convert char-separated table to html table
-# 
-# source file of the GNU LilyPond music typesetter
-# 
-# (c) 1998 Jan Nieuwenhuizen <janneke@gnu.org>
-
-version = '0.1'
-name = 'table-to-html'
-
-import os
-import sys
-import getopt
-import string
-import time
-import re
-
-format = 'html'
-
-def program_id ():
-	return name + ' version ' + version;
-
-def identify ():
-	sys.stdout.write (program_id () + '\n')
-
-def help ():
-	sys.stdout.write (
-r"""Usage: table-to-html [OPTION]... TABLE-FILE HTML-FILENAME
-Generate pretty table from char separated table
-Options:
-  -h, --help			 print this help
-  -p, --package=DIR	  specify package
-  -s, --separator=SEP	specify separator [:]
-  -t, --latex			do latex output instead
-""")
-	sys.exit (0)
-
-
-def header (html):
-	html.write ('<body bgcolor=white><table cellspacing=10>')
-
-def footer (html):
-	html.write ('</table></body>')
-
-def convert_html (lines, outname, cols, separator, linesep):
-	# ugh
-	html = open (outname, 'w')
-
-	header (html)
-	i = 0
-	for line in lines:
-		i = i + 1
-		if not len(line):
-			continue
-		columns = string.split (line, separator)
-		html_line = '<tr><td>' + string.join (columns, '</td><td>') + '</td></tr>'
-		html_line= re.sub (linesep, ' ', html_line)
-		html.write (html_line)
-
-		if len (columns) <> cols:
-				print i
-				raise 'not enough cols'
-
-	footer (html)
-	html.close ()
-
-
-def convert_tex (lines, outname, cols, separator, linesep):
-	html = open(outname, 'w')
-	header = r"""\documentclass{article}
-\begin{document}
-{\parindent -1pc
-	\parskip 0pc\parsep 0pc
-	%  COMMENT( from the texbook)
-	\def\length#1{\count0=0 \getlength#1\end}
-	\def\getlength#1{\ifx#1\end \let\next=\relax
-	  \else\advance\count0 by1 \let\next=\getlength\fi \next}
-	  \def\inlanguage#1#2{{\length{#2}%
-		\ifnum\count0=0
-		\else
-		\emph{#1}: #2.
-		\fi}}
-	\small
-
-	\def\tableentry#1#2#3#4#5#6#7{\par{\bf #1}: #7
-	  \inlanguage{Fran\c cais}{#2}
-	   \inlanguage{British}{#4}  \inlanguage{Deutsch}{#3}
-	   \inlanguage{Nederlands}{#5}\inlanguage{Italiano}{#6}}
-"""
-
-	html.write (header)
-	i = 0
-	for line in lines:
-		i = i + 1
-		if not len(line):
-			continue
-		columns = string.split (line, separator)
-		if len (columns) <> cols:
-				print i
-				raise 'not enough cols'
-
-		tex_line =  '\\tableentry{' + string.join (columns, '}{') + '}\n'
-		tex_line = re.sub (linesep, ' ', tex_line)
-		html.write (tex_line)
-		
-	html.write(r"""}\end{document}""")
-	html.close ()
-
-def convert_texinfo (lines, outname, cols, separator, linesep):
-		pass
-
-
-
-identify ()
-(options, files) = getopt.getopt (
-	sys.argv[1:], 'f:tl:o:h:c:s:', ['columns=', 'help', 'format=', 'output=', 'separator=', 'linesep='])
-latex = 0
-separator = '@'
-output = ''
-linesep = '\r'
-for opt in options:
-	o = opt[0]
-	a = opt[1]
-	if o == '--separator' or o == '-s':
-		separator = a
-	elif o== '--help' or o == '-h':
-		help ()
-	elif o=='--format' or o == '-f':
-		format = a
-	elif o == '--output' or o == '-o':
-		output = a
-	elif o == '--linesep' or o == '-l':
-		linesep = a
-	elif o == '--columns' or o == '-c':
-		cols =  string.atoi(a)
-	else:
-		print o
-		raise getopt.error
-
-lines = open (files[0]).readlines ()
-
-if format == 'latex':
-	convert_tex (lines, output,  cols, separator, linesep)
-elif format == 'html':
-	convert_html (lines, output, cols, separator, linesep)
-elif format == 'texi':
-	convert_texinfo (lines, output, cols, separator, linesep)
-
diff --git a/stepmake/bin/tar-docxx.sh b/stepmake/bin/tar-docxx.sh
deleted file mode 100644
index c1ba5322f3..0000000000
--- a/stepmake/bin/tar-docxx.sh
+++ /dev/null
@@ -1,49 +0,0 @@
-#!/bin/sh
-
-cwd=`pwd`
-
-if [ "$1" = "" ]; then
-    echo usage tar-docxx TARBALL
-    exit 2
-else
-  TARBALL=$1
-fi
-
-
-# mail-address
-if [ "$MAILADDRESS" != "" ]; then
-	echo mail address is $MAILADDRESS
-else
-	echo "mail-address:6: warning: \$MAILADDRESS undefined" > /dev/stderr
-	echo $USER@`hostname`
-fi
-
-
-if [ ! -e $TARBALL ]; then
-  echo $TARBALL does not exist
-  exit 2
-fi
-
-TARBALLBASE=`basename $TARBALL`
-
-TAROUTDIR=/tmp/tar-docxx
-rm -rf $TAROUTDIR
-mkdir -p $TAROUTDIR
-echo untarring ...
-tar -C $TAROUTDIR -zxf $TARBALL '*.hh' '*.h'
-
-cd $TAROUTDIR 
-DATE=`date`
-
-cat << EOF > banner.html
-  This program documentation comes from $TARBALLBASE.  It was generated by
-  $USERNAME &lt<a href="mail:$MAILADDRESS">$MAILADDRESS</a>&gt on $DATE
-EOF
-
-mkdir docxx;
-echo doc++ ...
-doc++ -pSf -B banner.html -d docxx `find -type f`
-echo tarring ...
-tar -czf $cwd/progdocs.tar.gz docxx/
-
-rm -rf $TAROUTDIR
diff --git a/stepmake/bin/zet-step.sh b/stepmake/bin/zet-step.sh
deleted file mode 100755
index b45e937d3d..0000000000
--- a/stepmake/bin/zet-step.sh
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/bin/sh
-# zet-step.sh --- configure StepMake sourcetree
-# nice in first character unique name
-#
-export PACKAGE_NAME=StepMake
-prefix=$HOME/usr
-#
-#
-. ./stepmake/bin/package-zet.sh
-#
-# The package root dir looks like this:
-#
-# <SEE INSTALL.txt>
-#
-# ln -sf $STEPMAKEL_SOURCEDIR/src/stepmake/out/step $prefix/bin/step
-
-./configure --prefix=$prefix
-
-- 
2.39.5