Draft version of adding flaot output

Author: Thomas Kiley

src/goto-programs/xml_goto_trace.cpp

@@ -19,6 +19,7 @@ Author: Daniel Kroening
 #include <util/xml_irep.h>
 
 #include <langapi/language_util.h>
+#include <util/arith_tools.h>
 
 #include "printf_formatter.h"
 #include "xml_expr.h"
@@ -88,16 +89,31 @@ void convert(
         }
       }
 
-      std::string full_lhs_string, full_lhs_value_string;
+      std::string full_lhs_string, full_lhs_value_string,
+      full_lhs_value_binary_string;
 
       if(step.full_lhs.is_not_nil())
         full_lhs_string = from_expr(ns, identifier, step.full_lhs);
 
       if(step.full_lhs_value.is_not_nil())
+      {
         full_lhs_value_string = from_expr(ns, identifier, step.full_lhs_value);
+        if(can_cast_type<floatbv_typet>(step.full_lhs_value.type()))
+        {
+          const auto width =
+            to_floatbv_type(step.full_lhs_value.type()).get_width();
+          full_lhs_value_binary_string =
+            integer2binary(bvrep2integer(step.full_lhs_value.get(ID_value),
+              width,
+              false), width);
+        }
+      }
 
       xml_assignment.new_element("full_lhs").data = full_lhs_string;
-      xml_assignment.new_element("full_lhs_value").data = full_lhs_value_string;
+      xmlt &full_lhs_value_node = xml_assignment.new_element("full_lhs_value");
+      if(full_lhs_value_binary_string != "")
+        full_lhs_value_node.set_attribute("binary", full_lhs_value_binary_string);
+      full_lhs_value_node.data = full_lhs_value_string;
 
       xml_assignment.set_attribute_bool("hidden", step.hidden);
       xml_assignment.set_attribute("thread", std::to_string(step.thread_nr));