1 files changed, 205 insertions, 0 deletions

diff --git a/c++-libbu++/src/list.cpp b/c++-libbu++/src/list.cpp
new file mode 100644
index 0000000..d081a22
--- /dev/null
+++ b/c++-libbu++/src/list.cpp
@@ -0,0 +1,205 @@
+#include "gats/list.h"
+
+#include "gats/string.h"
+#include "gats/integer.h"
+#include "gats/float.h"
+#include "gats/boolean.h"
+#include "gats/dictionary.h"
+
+#include <bu/formatter.h>
+#include <bu/stream.h>
+
+Gats::List::List()
+{
+}
+
+Gats::List::~List()
+{
+        for( iterator i = begin(); i; i++ )
+        {
+                delete *i;
+        }
+}
+
+Gats::Object *Gats::List::clone() const
+{
+        Gats::List *pClone = new Gats::List;
+        for( const_iterator i = begin(); i; i++ )
+        {
+                pClone->append( (*i)->clone() );
+        }
+        return pClone;
+}
+
+void Gats::List::write( Bu::Stream &rOut ) const
+{
+        rOut.write("l", 1 );
+        for( const_iterator i = begin(); i; i++ )
+        {
+                (*i)->write( rOut );
+        }
+        rOut.write("e", 1 );
+}
+
+void Gats::List::read( Bu::Stream &rIn, char cType )
+{
+        for(;;)
+        {
+                Gats::Object *pObj = Gats::Object::read( rIn );
+                if( pObj == NULL )
+                        break;
+                append( pObj );
+        }
+}
+
+void Gats::List::append( const char *s )
+{
+        Bu::List<Gats::Object *>::append( new Gats::String( s ) );
+}
+
+void Gats::List::append( const Bu::String &s )
+{
+        Bu::List<Gats::Object *>::append( new Gats::String( s ) );
+}
+
+void Gats::List::append( int32_t i )
+{
+        Bu::List<Gats::Object *>::append( new Gats::Integer( i ) );
+}
+
+void Gats::List::append( int64_t i )
+{
+        Bu::List<Gats::Object *>::append( new Gats::Integer( i ) );
+}
+
+void Gats::List::append( double d )
+{
+        Bu::List<Gats::Object *>::append( new Gats::Float( d ) );
+}
+
+void Gats::List::appendStr( const Bu::String &s )
+{
+        Bu::List<Gats::Object *>::append( new Gats::String( s ) );
+}
+
+void Gats::List::appendInt( int64_t i )
+{
+        Bu::List<Gats::Object *>::append( new Gats::Integer( i ) );
+}
+
+void Gats::List::appendFloat( double d )
+{
+        Bu::List<Gats::Object *>::append( new Gats::Float( d ) );
+}
+
+void Gats::List::appendBool( bool b )
+{
+        Bu::List<Gats::Object *>::append( new Gats::Boolean( b ) );
+}
+
+void Gats::List::appendList( Gats::List *pL )
+{
+        Bu::List<Gats::Object *>::append( pL );
+}
+
+void Gats::List::appendDict( Gats::Dictionary *pD )
+{
+        Bu::List<Gats::Object *>::append( pD );
+}
+
+Gats::List *Gats::List::appendList()
+{
+        Gats::List *pLst = new Gats::List();
+        appendList( pLst );
+        return pLst;
+}
+
+Gats::Dictionary *Gats::List::appendDict()
+{
+        Gats::Dictionary *pDict = new Gats::Dictionary();
+        appendDict( pDict );
+        return pDict;
+}
+
+void Gats::List::prepend( const char *s )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::String( s ) );
+}
+
+void Gats::List::prepend( const Bu::String &s )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::String( s ) );
+}
+
+void Gats::List::prepend( int32_t i )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::Integer( i ) );
+}
+
+void Gats::List::prepend( int64_t i )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::Integer( i ) );
+}
+
+void Gats::List::prepend( double d )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::Float( d ) );
+}
+
+void Gats::List::prependStr( const Bu::String &s )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::String( s ) );
+}
+
+void Gats::List::prependInt( int64_t i )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::Integer( i ) );
+}
+
+void Gats::List::prependFloat( double d )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::Float( d ) );
+}
+
+void Gats::List::prependBool( bool b )
+{
+        Bu::List<Gats::Object *>::prepend( new Gats::Boolean( b ) );
+}
+
+void Gats::List::prependList( Gats::List *pL )
+{
+        Bu::List<Gats::Object *>::prepend( pL );
+}
+
+void Gats::List::prependDict( Gats::Dictionary *pD )
+{
+        Bu::List<Gats::Object *>::prepend( pD );
+}
+
+Gats::List *Gats::List::prependList()
+{
+        Gats::List *pLst = new Gats::List();
+        prependList( pLst );
+        return pLst;
+}
+
+Gats::Dictionary *Gats::List::prependDict()
+{
+        Gats::Dictionary *pDict = new Gats::Dictionary();
+        prependDict( pDict );
+        return pDict;
+}
+
+Bu::Formatter &operator<<( Bu::Formatter &f, const Gats::List &l )
+{
+        f << "(list) [";
+        f.incIndent();
+        for( Gats::List::const_iterator i = l.begin(); i; i++ )
+        {
+                f << f.nl << **i;
+        }
+        f.decIndent();
+        f << f.nl << "]";
+        return f;
+}
+