lilypond-0.1.48

diff --git a/flower/scalar.cc b/flower/scalar.cc
index f28e7699ed0a5718d70289f78ffa726f8a73e2e1..2b61b9089f0587fd81de04980cd53b52ce57e6e7 100644 (file)
--- a/flower/scalar.cc
+++ b/flower/scalar.cc
@@ -1,5 +1,5 @@
 /*
-  scalar.cc -- implement 
+  scalar.cc -- implement Scalar
 
   source file of the Flower Library
 
@@ -9,11 +9,11 @@
 #include <assert.h>
 #include <stdio.h>
 #include "scalar.hh"
+#include "rational.hh"
 
 Scalar::Scalar (Rational r)
-  :String (r)
 {
-
+  (*this) = r.str ();
 }
 
 Scalar::operator Rational ()