summaryrefslogtreecommitdiff
path: root/TAO/TAO_IDL/be/be_sunsoft.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/TAO_IDL/be/be_sunsoft.cpp')
-rw-r--r--TAO/TAO_IDL/be/be_sunsoft.cpp108
1 files changed, 0 insertions, 108 deletions
diff --git a/TAO/TAO_IDL/be/be_sunsoft.cpp b/TAO/TAO_IDL/be/be_sunsoft.cpp
deleted file mode 100644
index f6bbac39a76..00000000000
--- a/TAO/TAO_IDL/be/be_sunsoft.cpp
+++ /dev/null
@@ -1,108 +0,0 @@
-#include "idl.h"
-#include "idl_extern.h"
-#include "be.h"
-#include "be_sunsoft.h"
-
-TAO_SunSoft_OutStream::TAO_SunSoft_OutStream (void)
- : TAO_OutStream ()
-{
-}
-
-TAO_SunSoft_OutStream::~TAO_SunSoft_OutStream (void)
-{
-}
-
-TAO_OutStream &
-TAO_SunSoft_OutStream::print (Identifier *id)
-{
- ACE_OS::fprintf (this->fp_, id->get_string ());
- return *this;
-}
-
-TAO_OutStream &
-TAO_SunSoft_OutStream::print (UTL_IdList *idl)
-{
- UTL_IdListActiveIterator *i = new UTL_IdListActiveIterator (idl);
- long first = I_TRUE;
- long second = I_FALSE;
-
- while (!(i->is_done ()))
- {
- if (!first)
- *this << "::";
- else if (second)
- first = second = I_FALSE;
- // print the identifier
- *this << i->item ();
- if (first)
- {
- if (ACE_OS::strcmp (i->item ()->get_string (), "") != 0)
- // does not start with a ""
- first = I_FALSE;
- else
- second = I_TRUE;
- }
- i->next ();
- }
- return *this;
-}
-
-TAO_OutStream&
-TAO_SunSoft_OutStream::print (AST_Expression *expr)
-{
- AST_Expression::AST_ExprValue *ev = expr->ev ();
-
- if (ev)
- {
- switch (ev->et)
- {
- case AST_Expression::EV_short:
- this->TAO_OutStream::print ("%hd", ev->u.sval);
- break;
- case AST_Expression::EV_ushort:
- this->TAO_OutStream::print ("%hu", ev->u.usval);
- break;
- case AST_Expression::EV_long:
- this->TAO_OutStream::print ("%ld", ev->u.lval);
- break;
- case AST_Expression::EV_ulong:
- this->TAO_OutStream::print ("%ld", ev->u.ulval);
- break;
- case AST_Expression::EV_longlong:
- break;
- case AST_Expression::EV_ulonglong:
- break;
- case AST_Expression::EV_float:
- this->TAO_OutStream::print ("%f", ev->u.fval);
- break;
- case AST_Expression::EV_double:
- this->TAO_OutStream::print ("%f", ev->u.dval);
- break;
- case AST_Expression::EV_longdouble:
- break;
- case AST_Expression::EV_char:
- this->TAO_OutStream::print ("'%c'", ev->u.cval);
- break;
- case AST_Expression::EV_wchar:
- break;
- case AST_Expression::EV_octet:
- this->TAO_OutStream::print ("%c", ev->u.oval);
- break;
- case AST_Expression::EV_bool:
- this->TAO_OutStream::print ("%ld", ev->u.bval);
- break;
- case AST_Expression::EV_string:
- this->TAO_OutStream::print ("\"%s\"", ev->u.strval->get_string ());
- break;
- case AST_Expression::EV_wstring:
- break;
- default:
- break;
- }
- }
- else //
- {
- // XXXASG: need to add code here
- }
- return *this;
-}