+++ /dev/null
-#!@PYTHON@
-
-#
-# lily-python.py -- implement general LilyPond-wide python stuff
-#
-# source file of the GNU LilyPond music typesetter
-#
-# (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
-#
-
-import posix
-import pwd
-import regex
-import regsub
-import string
-import sys
-import os
-import getopt
-
-
-
-
-
-make_assign_re = regex.compile('^\([A-Z_]*\) *= *\(.*\)$')
-
-def version_str_tuple(file):
- lines = file.readlines()
-
- mi = pa = mp = mj = ''
-
- for l in lines:
- if make_assign_re.search(l) <> -1:
- nm = make_assign_re.group(1)
- val = make_assign_re.group(2)
- if nm == 'TOPLEVEL_MAJOR_VERSION':
- mj = val
- elif nm == 'TOPLEVEL_MINOR_VERSION':
- mi = val
- elif nm == 'TOPLEVEL_PATCH_LEVEL':
- pa = val
- elif nm == 'TOPLEVEL_MY_PATCH_LEVEL':
- mp = val
- return (mj,mi,pa,mp)
-
-class Lilydirs:
- def __init__(self):
- try:
- self.topdir = os.environ['LILYPOND_SOURCEDIR'] + '/'
- except IndexError:
- self.topdir = os.environ['HOME'] + 'musix/current'
-
- self.release_dir = self.topdir + '../releases/'
- self.patch_dir = self.topdir + '../patches/'
-
- def version_str_tuple(self):
- f = open (self.topdir + 'VERSION')
- v = version_str_tuple(f)
- f.close ()
- return v
-
-lilydirs = Lilydirs()
-
-print lilydirs.version_str_tuple()
+++ /dev/null
-#!/bin/sh
-
-case $# in
-0) echo make_patch old new name
- exit 1;;
-esac
-
-old=$1
-new=$2
-nm=$3-
-
-newarc=../releases/$nm$new.tar.gz
-oldarc=../releases/$nm$old.tar.gz
-
-
-if [ ! -x $nm$new ]
-then
- echo untarring ..
- if [ ! -f $newarc ]
- then
- echo "can't find $newarc"
- exit
- fi
- tar zfx $newarc
-fi
-if [ ! -x $nm$old ]
-then
- echo untarring
-
- if [ ! -f $oldarc ]
- then
- echo "can't find $oldarc"
- exit
- fi
- tar zfx $oldarc
-fi
-
-# not interested in auto generated files.
-for a in lilypond.lsm INSTALL.text AUTHORS.text lilypond.spec configure; do
- rm `find $nm$old $nm$new -name $a`
-done
-
-cat <<EOF > patch-$new
-Generated with
-
- make_patch $1 $2 $3
-
-usage
-
- cd lilypond-source-dir; patch -E -p0 < patch-$new
-
-Patches do not contain automatically generated files,
-i.e. you should rerun configure
-EOF
-
-(cd $nm$new; diff -urN ../$nm$old . >> ../patch-$new)
-rm -rf $nm$old $nm$new
+++ /dev/null
-
-def simple_serif(expr p,q, a)=
- p{dir(angle(q-p) -a)} .. q{ - dir(angle(p -q) + a)}
-enddef;
-%
-% Accidentals from various sources, notably
-%
-% Baerenreiter edition of Schuberts `Auf dem Strom' (sharp, natural, flat)
-% F Hofmeister edition of Muellers `Etueden fuer Horn' (double sharp)
-%
-
-
-%tracingall;
-%proofing := 2;
-%\tracingequations:= tracingonline := 1;
-
-fet_begingroup("accidentals");
-
-
-
-fet_endgroup("accidentals");
-