From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sun, 14 Mar 2004 02:21:35 +0000 (+0000)
Subject: (make-font-tree): new function.
X-Git-Tag: release/2.1.31~10
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=95a9133f90c6d552d446a259db934a97fc1dc6d9;p=lilypond.git

(make-font-tree): new function.
---

diff --git a/ChangeLog b/ChangeLog
index c300eb7669..33dffd646c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2004-03-14  Han-Wen Nienhuys   <hanwen@xs4all.nl>
 
+	* lily/font-interface.cc: add font-encoding property.
+
 	* scm/lily.scm (chain-assoc-get): bugfix.
 
 	* lily/paper-book.cc (stencil2line): don't make static SCMs to
diff --git a/scm/new-font.scm b/scm/new-font.scm
index d378c82842..847a9100a9 100644
--- a/scm/new-font.scm
+++ b/scm/new-font.scm
@@ -222,3 +222,5 @@
        ))
     n))
 
+(define-public (magstep x)
+  (exp (* (/ x 6) (log 2))))