1 files changed, 35 insertions, 0 deletions
diff --git a/openssl/diagnostics.cxx b/openssl/diagnostics.cxx
new file mode 100644
index 0000000..4dd13e0
--- /dev/null
+++ b/openssl/diagnostics.cxx
@@ -0,0 +1,35 @@
+// file      : openssl/diagnostics.cxx -*- C++ -*-
+// copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
+// license   : MIT; see accompanying LICENSE file
+
+#include <openssl/diagnostics.hxx>
+
+namespace openssl
+{
+  // Diagnostic facility, project specifics.
+  //
+
+  void simple_prologue_base::
+  operator() (const diag_record& r) const
+  {
+    if (type_ != nullptr)
+      r << type_;
+
+    if (name_ != nullptr)
+      r << name_;
+
+    if (data_ != nullptr)
+      r << '(' << data_ << ')';
+
+    if (name_ != nullptr || data_ != nullptr)
+      r << ": ";
+  }
+
+  basic_mark error ("error: ");
+  basic_mark warn  ("warning: ");
+  basic_mark info  ("info: ");
+  basic_mark text  (nullptr);
+  fail_mark  fail  ("error: ");
+
+  const fail_end endf;
+}