partial: 0.1.62.jcn

diff --git a/lily/include/mudela-version.hh b/lily/include/mudela-version.hh
new file mode 100644 (file)
index 0000000..0858c81
--- /dev/null
+++ b/lily/include/mudela-version.hh
@@ -0,0 +1,28 @@
+/*
+  mudela-version.hh -- declare Mudela_version
+
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1998 Jan Nieuwenhuizen <jan@digicash.com>
+
+*/
+
+#ifndef MUDELA_VERSION_HH
+#define MUDELA_VERSION_HH
+
+#include "string.hh"
+
+struct Mudela_version 
+{
+  Mudela_version (int major, int minor, int patch);
+  Mudela_version (String str);
+
+  String str () const;
+  operator int () const;
+
+  int major_i_;
+  int minor_i_;
+  int patch_i_;
+};
+
+#endif // MUDELA_VERSION_HH

diff --git a/lily/mudela-version.cc b/lily/mudela-version.cc
new file mode 100644 (file)
index 0000000..dbcc1b5
--- /dev/null
+++ b/lily/mudela-version.cc
@@ -0,0 +1,42 @@
+/*
+  mudela-version.cc -- implement Mudela_version
+
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1998 Jan Nieuwenhuizen <jan@digicash.com>
+
+*/
+
+#include "mudela-version.hh"
+#include "string-convert.hh"
+#include "varray.hh"
+
+Mudela_version::Mudela_version (int major, int minor, int patch)
+{
+  major_i_ = major;
+  minor_i_ = minor;
+  patch_i_ = patch;
+}
+
+Mudela_version::Mudela_version (String str)
+{
+  Array<String> version;
+  version = String_convert::split_arr (str, '.');
+  assert (version.size () == 3);
+  major_i_ = version[0].value_i ();
+  minor_i_ = version[1].value_i ();
+  patch_i_ = version[2].value_i ();
+}
+
+String
+Mudela_version::str () const
+{
+  return String (major_i_) + "." + String (minor_i_) + "." + String (patch_i_);
+}
+
+Mudela_version::operator int () const
+{
+    // ugh
+  return 100000 * major_i_ + 1000 * minor_i_ + patch_i_;
+}
+