-/* $Id$
-
-This file is part of libmspdatafile
-Copyright © 2006 Mikko Rasa, Mikkosoft Productions
-Distributed under the LGPL
-*/
-
+#include <msp/io/print.h>
#include <msp/strings/utils.h>
#include "statement.h"
#include "textwriter.h"
namespace Msp {
namespace DataFile {
-TextWriter::TextWriter(ostream &o):
+TextWriter::TextWriter(IO::Base &o):
WriterMode(o)
{ }
{
string indent(level, '\t');
- out<<indent<<st.keyword;
- for(ValueArray::const_iterator i=st.args.begin(); i!=st.args.end(); ++i)
+ IO::print(out, "%s%s", indent, st.keyword);
+ for(ValueArray::const_iterator i = st.args.begin(); i!=st.args.end(); ++i)
{
- out<<' ';
- if(i->get_type()==STRING)
- out<<'\"'<<c_escape(i->get_raw(), false)<<'\"';
- else if(i->get_type()==BOOLEAN)
- out<<(i->get<bool>() ? "true" : "false");
- else
- out<<i->get_raw();
+ out.put(' ');
+ if(i->get_signature()==StringType::signature)
+ IO::print(out, "\"%s\"", c_escape(i->get<StringType::Store>(), false));
+ else if(i->get_signature()==BoolType::signature)
+ out.write(i->get<BoolType::Store>() ? "true" : "false");
+ else if(i->get_signature()==IntType::signature)
+ out.write(lexical_cast(i->get<IntType::Store>()));
+ else if(i->get_signature()==FloatType::signature)
+ out.write(format("%15g", (i->get<FloatType::Store>())));
+ else if(i->get_signature()==SymbolType::signature)
+ {
+ string name = i->get<SymbolType::Store>().name;
+ if(isdigit(name[0]))
+ out.write("\\"+name);
+ else
+ out.write(name);
+ }
}
if(!st.sub.empty())
{
- out<<'\n'<<indent<<"{\n";
- for(list<Statement>::const_iterator i=st.sub.begin(); i!=st.sub.end(); ++i)
+ IO::print(out, "\n%s{\n", indent);
+ for(list<Statement>::const_iterator i = st.sub.begin(); i!=st.sub.end(); ++i)
write_(*i, level+1);
- out<<indent<<'}';
+ IO::print(out, "%s}", indent);
}
- out<<";\n";
+ out.write(";\n", 2);
}
} // namespace DataFile