TAO/tao/AnyTypeCode/BasicTypeTraits.cpp

   1 // -*- C++ -*-
   2
   3 //=============================================================================
   4 /**
   5  *  @file    BasicTypeTraits.cpp
   6  *
   7  *  Assign values to specialization members in BasicTypeTraits.h.
   8  *
   9  *  @author Jeff Parsons <j.parsons@vanderbilt.edu>
  10  */
  11 //=============================================================================
  12
  13 #include "tao/AnyTypeCode/BasicTypeTraits.h"
  14 #include "tao/AnyTypeCode/BooleanSeqA.h"
  15 #include "tao/AnyTypeCode/CharSeqA.h"
  16 #include "tao/AnyTypeCode/OctetSeqA.h"
  17 #include "tao/AnyTypeCode/WCharSeqA.h"
  18 #include "tao/AnyTypeCode/ShortSeqA.h"
  19 #include "tao/AnyTypeCode/UShortSeqA.h"
  20 #include "tao/AnyTypeCode/LongSeqA.h"
  21 #include "tao/AnyTypeCode/ULongSeqA.h"
  22 #include "tao/AnyTypeCode/LongLongSeqA.h"
  23 #include "tao/AnyTypeCode/ULongLongSeqA.h"
  24 #include "tao/AnyTypeCode/FloatSeqA.h"
  25 #include "tao/AnyTypeCode/DoubleSeqA.h"
  26 #include "tao/AnyTypeCode/LongDoubleSeqA.h"
  27 #include "tao/AnyTypeCode/AnySeqA.h"
  28
  29 TAO_BEGIN_VERSIONED_NAMESPACE_DECL
  30
  31 namespace TAO
  32 {
  33   CORBA::TypeCode_ptr const
  34   BasicTypeTraits<CORBA::Boolean>::tc_value = CORBA::_tc_boolean;
  35
  36   CORBA::TCKind const
  37   BasicTypeTraits<CORBA::Boolean>::tckind_value = CORBA::tk_boolean;
  38
  39   BasicTypeTraits<CORBA::Boolean>::return_type
  40   BasicTypeTraits<CORBA::Boolean>::convert (extract_type& et)
  41   {
  42     return et.ref_;
  43   }
  44
  45   //================================================================
  46
  47   CORBA::TypeCode_ptr const
  48   BasicTypeTraits<CORBA::Octet>::tc_value = CORBA::_tc_octet;
  49
  50   CORBA::TCKind const
  51   BasicTypeTraits<CORBA::Octet>::tckind_value = CORBA::tk_octet;
  52
  53   BasicTypeTraits<CORBA::Octet>::return_type
  54   BasicTypeTraits<CORBA::Octet>::convert (extract_type& et)
  55   {
  56     return et.ref_;
  57   }
  58
  59   //================================================================
  60
  61   CORBA::TypeCode_ptr const
  62   BasicTypeTraits<CORBA::Char>::tc_value = CORBA::_tc_char;
  63
  64   CORBA::TCKind const
  65   BasicTypeTraits<CORBA::Char>::tckind_value = CORBA::tk_char;
  66
  67   BasicTypeTraits<CORBA::Char>::return_type
  68   BasicTypeTraits<CORBA::Char>::convert (extract_type& et)
  69   {
  70     return et.ref_;
  71   }
  72
  73   //================================================================
  74
  75 #if (defined (ACE_HAS_WCHAR) || defined (ACE_HAS_XPG4_MULTIBYTE_CHAR)) && !defined (ACE_LACKS_NATIVE_WCHAR_T)
  76
  77   CORBA::TypeCode_ptr const
  78   BasicTypeTraits<CORBA::WChar>::tc_value = CORBA::_tc_wchar;
  79
  80   CORBA::TCKind const
  81   BasicTypeTraits<CORBA::WChar>::tckind_value = CORBA::tk_wchar;
  82
  83   BasicTypeTraits<CORBA::WChar>::return_type
  84   BasicTypeTraits<CORBA::WChar>::convert (extract_type& et)
  85   {
  86     return et.ref_;
  87   }
  88
  89 #endif
  90
  91   //================================================================
  92
  93   CORBA::TypeCode_ptr const
  94   BasicTypeTraits<CORBA::Short>::tc_value = CORBA::_tc_short;
  95
  96   CORBA::TCKind const
  97   BasicTypeTraits<CORBA::Short>::tckind_value = CORBA::tk_short;
  98
  99   BasicTypeTraits<CORBA::Short>::return_type
 100   BasicTypeTraits<CORBA::Short>::convert (extract_type& et)
 101   {
 102     return et;
 103   }
 104
 105   //================================================================
 106
 107   CORBA::TypeCode_ptr const
 108   BasicTypeTraits<CORBA::UShort>::tc_value = CORBA::_tc_ushort;
 109
 110   CORBA::TCKind const
 111   BasicTypeTraits<CORBA::UShort>::tckind_value = CORBA::tk_ushort;
 112
 113   BasicTypeTraits<CORBA::UShort>::return_type
 114   BasicTypeTraits<CORBA::UShort>::convert (extract_type& et)
 115   {
 116     return et;
 117   }
 118
 119   //================================================================
 120
 121   CORBA::TypeCode_ptr const
 122   BasicTypeTraits<CORBA::Long>::tc_value = CORBA::_tc_long;
 123
 124   CORBA::TCKind const
 125   BasicTypeTraits<CORBA::Long>::tckind_value = CORBA::tk_long;
 126
 127   BasicTypeTraits<CORBA::Long>::return_type
 128   BasicTypeTraits<CORBA::Long>::convert (extract_type& et)
 129   {
 130     return et;
 131   }
 132
 133   //================================================================
 134
 135   CORBA::TypeCode_ptr const
 136   BasicTypeTraits<CORBA::ULong>::tc_value = CORBA::_tc_ulong;
 137
 138   CORBA::TCKind const
 139   BasicTypeTraits<CORBA::ULong>::tckind_value = CORBA::tk_ulong;
 140
 141   BasicTypeTraits<CORBA::ULong>::return_type
 142   BasicTypeTraits<CORBA::ULong>::convert (extract_type& et)
 143   {
 144     return et;
 145   }
 146
 147   //================================================================
 148
 149   CORBA::TypeCode_ptr const
 150   BasicTypeTraits<CORBA::LongLong>::tc_value = CORBA::_tc_longlong;
 151
 152   CORBA::TCKind const
 153   BasicTypeTraits<CORBA::LongLong>::tckind_value = CORBA::tk_longlong;
 154
 155   BasicTypeTraits<CORBA::LongLong>::return_type
 156   BasicTypeTraits<CORBA::LongLong>::convert (extract_type& et)
 157   {
 158     return et;
 159   }
 160
 161   //================================================================
 162
 163   CORBA::TypeCode_ptr const
 164   BasicTypeTraits<CORBA::ULongLong>::tc_value = CORBA::_tc_ulonglong;
 165
 166   CORBA::TCKind const
 167   BasicTypeTraits<CORBA::ULongLong>::tckind_value = CORBA::tk_ulonglong;
 168
 169   BasicTypeTraits<CORBA::ULongLong>::return_type
 170   BasicTypeTraits<CORBA::ULongLong>::convert (extract_type& et)
 171   {
 172     return et;
 173   }
 174
 175   //================================================================
 176
 177   CORBA::TypeCode_ptr const
 178   BasicTypeTraits<CORBA::Float>::tc_value = CORBA::_tc_float;
 179
 180   CORBA::TCKind const
 181   BasicTypeTraits<CORBA::Float>::tckind_value = CORBA::tk_float;
 182
 183   BasicTypeTraits<CORBA::Float>::return_type
 184   BasicTypeTraits<CORBA::Float>::convert (extract_type& et)
 185   {
 186     return et;
 187   }
 188
 189   //================================================================
 190
 191   CORBA::TypeCode_ptr const
 192   BasicTypeTraits<CORBA::Double>::tc_value = CORBA::_tc_double;
 193
 194   CORBA::TCKind const
 195   BasicTypeTraits<CORBA::Double>::tckind_value = CORBA::tk_double;
 196
 197   BasicTypeTraits<CORBA::Double>::return_type
 198   BasicTypeTraits<CORBA::Double>::convert (extract_type& et)
 199   {
 200     return et;
 201   }
 202
 203   //================================================================
 204
 205   CORBA::TypeCode_ptr const
 206   BasicTypeTraits<CORBA::LongDouble>::tc_value = CORBA::_tc_longdouble;
 207
 208   CORBA::TCKind const
 209   BasicTypeTraits<CORBA::LongDouble>::tckind_value = CORBA::tk_longdouble;
 210
 211   BasicTypeTraits<CORBA::LongDouble>::return_type
 212   BasicTypeTraits<CORBA::LongDouble>::convert (extract_type& et)
 213   {
 214     return et;
 215   }
 216
 217   //================================================================
 218
 219   CORBA::TypeCode_ptr const
 220   BasicTypeTraits<CORBA::Char *>::tc_value = CORBA::_tc_string;
 221
 222   CORBA::TCKind const
 223   BasicTypeTraits<CORBA::Char *>::tckind_value = CORBA::tk_string;
 224
 225   BasicTypeTraits<CORBA::Char *>::return_type
 226   BasicTypeTraits<CORBA::Char *>::convert (extract_type& et)
 227   {
 228     return et;
 229   }
 230
 231   //================================================================
 232
 233   CORBA::TypeCode_ptr const
 234   BasicTypeTraits<CORBA::WChar *>::tc_value = CORBA::_tc_wstring;
 235
 236   CORBA::TCKind const
 237   BasicTypeTraits<CORBA::WChar *>::tckind_value = CORBA::tk_wstring;
 238
 239   BasicTypeTraits<CORBA::WChar *>::return_type
 240   BasicTypeTraits<CORBA::WChar *>::convert (extract_type& et)
 241   {
 242     return et;
 243   }
 244
 245   //================================================================
 246
 247   CORBA::TypeCode_ptr const
 248   BasicTypeTraits<CORBA::Any>::tc_value = CORBA::_tc_any;
 249
 250   CORBA::TCKind const
 251   BasicTypeTraits<CORBA::Any>::tckind_value = CORBA::tk_any;
 252
 253   BasicTypeTraits<CORBA::Any>::return_type
 254   BasicTypeTraits<CORBA::Any>::convert (extract_type& et)
 255   {
 256     return et;
 257   }
 258
 259   //================================================================
 260
 261   CORBA::TypeCode_ptr const
 262   BasicTypeTraits<CORBA::Object_ptr>::tc_value = CORBA::_tc_Object;
 263
 264   CORBA::TCKind const
 265   BasicTypeTraits<CORBA::Object_ptr>::tckind_value = CORBA::tk_objref;
 266
 267   BasicTypeTraits<CORBA::Object_ptr>::return_type
 268   BasicTypeTraits<CORBA::Object_ptr>::convert (extract_type& et)
 269   {
 270     return et;
 271   }
 272
 273   //================================================================
 274
 275   CORBA::TypeCode_ptr const
 276   BasicTypeTraits<CORBA::TypeCode_ptr>::tc_value = CORBA::_tc_TypeCode;
 277
 278   CORBA::TCKind const
 279   BasicTypeTraits<CORBA::TypeCode_ptr>::tckind_value = CORBA::tk_TypeCode;
 280
 281   BasicTypeTraits<CORBA::TypeCode_ptr>::return_type
 282   BasicTypeTraits<CORBA::TypeCode_ptr>::convert (extract_type& et)
 283   {
 284     return et;
 285   }
 286
 287   //================================================================
 288
 289   CORBA::TypeCode_ptr const
 290   BasicTypeTraits<CORBA::BooleanSeq>::tc_value = CORBA::_tc_BooleanSeq;
 291
 292   CORBA::TCKind const
 293   BasicTypeTraits<CORBA::BooleanSeq>::tckind_value = CORBA::tk_sequence;
 294
 295   BasicTypeTraits<CORBA::BooleanSeq>::return_type
 296   BasicTypeTraits<CORBA::BooleanSeq>::convert (extract_type& et)
 297   {
 298     return et;
 299   }
 300
 301   //================================================================
 302
 303   CORBA::TypeCode_ptr const
 304   BasicTypeTraits<CORBA::OctetSeq>::tc_value = CORBA::_tc_OctetSeq;
 305
 306   CORBA::TCKind const
 307   BasicTypeTraits<CORBA::OctetSeq>::tckind_value = CORBA::tk_sequence;
 308
 309   BasicTypeTraits<CORBA::OctetSeq>::return_type
 310   BasicTypeTraits<CORBA::OctetSeq>::convert (extract_type& et)
 311   {
 312     return et;
 313   }
 314
 315   //================================================================
 316
 317   CORBA::TypeCode_ptr const
 318   BasicTypeTraits<CORBA::CharSeq>::tc_value = CORBA::_tc_CharSeq;
 319
 320   CORBA::TCKind const
 321   BasicTypeTraits<CORBA::CharSeq>::tckind_value = CORBA::tk_sequence;
 322
 323   BasicTypeTraits<CORBA::CharSeq>::return_type
 324   BasicTypeTraits<CORBA::CharSeq>::convert (extract_type& et)
 325   {
 326     return et;
 327   }
 328
 329   //================================================================
 330
 331   CORBA::TypeCode_ptr const
 332   BasicTypeTraits<CORBA::WCharSeq>::tc_value = CORBA::_tc_WCharSeq;
 333
 334   CORBA::TCKind const
 335   BasicTypeTraits<CORBA::WCharSeq>::tckind_value = CORBA::tk_sequence;
 336
 337   BasicTypeTraits<CORBA::WCharSeq>::return_type
 338   BasicTypeTraits<CORBA::WCharSeq>::convert (extract_type& et)
 339   {
 340     return et;
 341   }
 342
 343   //================================================================
 344
 345   CORBA::TypeCode_ptr const
 346   BasicTypeTraits<CORBA::ShortSeq>::tc_value = CORBA::_tc_ShortSeq;
 347
 348   CORBA::TCKind const
 349   BasicTypeTraits<CORBA::ShortSeq>::tckind_value = CORBA::tk_sequence;
 350
 351   BasicTypeTraits<CORBA::ShortSeq>::return_type
 352   BasicTypeTraits<CORBA::ShortSeq>::convert (extract_type& et)
 353   {
 354     return et;
 355   }
 356
 357   //================================================================
 358
 359   CORBA::TypeCode_ptr const
 360   BasicTypeTraits<CORBA::UShortSeq>::tc_value = CORBA::_tc_UShortSeq;
 361
 362   CORBA::TCKind const
 363   BasicTypeTraits<CORBA::UShortSeq>::tckind_value = CORBA::tk_sequence;
 364
 365   BasicTypeTraits<CORBA::UShortSeq>::return_type
 366   BasicTypeTraits<CORBA::UShortSeq>::convert (extract_type& et)
 367   {
 368     return et;
 369   }
 370
 371   //================================================================
 372
 373   CORBA::TypeCode_ptr const
 374   BasicTypeTraits<CORBA::LongSeq>::tc_value = CORBA::_tc_LongSeq;
 375
 376   CORBA::TCKind const
 377   BasicTypeTraits<CORBA::LongSeq>::tckind_value = CORBA::tk_sequence;
 378
 379   BasicTypeTraits<CORBA::LongSeq>::return_type
 380   BasicTypeTraits<CORBA::LongSeq>::convert (extract_type& et)
 381   {
 382     return et;
 383   }
 384
 385   //================================================================
 386
 387   CORBA::TypeCode_ptr const
 388   BasicTypeTraits<CORBA::ULongSeq>::tc_value = CORBA::_tc_ULongSeq;
 389
 390   CORBA::TCKind const
 391   BasicTypeTraits<CORBA::ULongSeq>::tckind_value = CORBA::tk_sequence;
 392
 393   BasicTypeTraits<CORBA::ULongSeq>::return_type
 394   BasicTypeTraits<CORBA::ULongSeq>::convert (extract_type& et)
 395   {
 396     return et;
 397   }
 398
 399   //================================================================
 400
 401   CORBA::TypeCode_ptr const
 402   BasicTypeTraits<CORBA::LongLongSeq>::tc_value = CORBA::_tc_LongLongSeq;
 403
 404   CORBA::TCKind const
 405   BasicTypeTraits<CORBA::LongLongSeq>::tckind_value = CORBA::tk_sequence;
 406
 407   BasicTypeTraits<CORBA::LongLongSeq>::return_type
 408   BasicTypeTraits<CORBA::LongLongSeq>::convert (extract_type& et)
 409   {
 410     return et;
 411   }
 412
 413   //================================================================
 414
 415   CORBA::TypeCode_ptr const
 416   BasicTypeTraits<CORBA::ULongLongSeq>::tc_value = CORBA::_tc_ULongLongSeq;
 417
 418   CORBA::TCKind const
 419   BasicTypeTraits<CORBA::ULongLongSeq>::tckind_value = CORBA::tk_sequence;
 420
 421   BasicTypeTraits<CORBA::ULongLongSeq>::return_type
 422   BasicTypeTraits<CORBA::ULongLongSeq>::convert (extract_type& et)
 423   {
 424     return et;
 425   }
 426
 427   //================================================================
 428
 429   CORBA::TypeCode_ptr const
 430   BasicTypeTraits<CORBA::FloatSeq>::tc_value = CORBA::_tc_FloatSeq;
 431
 432   CORBA::TCKind const
 433   BasicTypeTraits<CORBA::FloatSeq>::tckind_value = CORBA::tk_sequence;
 434
 435   BasicTypeTraits<CORBA::FloatSeq>::return_type
 436   BasicTypeTraits<CORBA::FloatSeq>::convert (extract_type& et)
 437   {
 438     return et;
 439   }
 440
 441   //================================================================
 442
 443   CORBA::TypeCode_ptr const
 444   BasicTypeTraits<CORBA::DoubleSeq>::tc_value = CORBA::_tc_DoubleSeq;
 445
 446   CORBA::TCKind const
 447   BasicTypeTraits<CORBA::DoubleSeq>::tckind_value = CORBA::tk_sequence;
 448
 449   BasicTypeTraits<CORBA::DoubleSeq>::return_type
 450   BasicTypeTraits<CORBA::DoubleSeq>::convert (extract_type& et)
 451   {
 452     return et;
 453   }
 454
 455   //================================================================
 456
 457   CORBA::TypeCode_ptr const
 458   BasicTypeTraits<CORBA::LongDoubleSeq>::tc_value = CORBA::_tc_LongDoubleSeq;
 459
 460   CORBA::TCKind const
 461   BasicTypeTraits<CORBA::LongDoubleSeq>::tckind_value = CORBA::tk_sequence;
 462
 463   BasicTypeTraits<CORBA::LongDoubleSeq>::return_type
 464   BasicTypeTraits<CORBA::LongDoubleSeq>::convert (extract_type& et)
 465   {
 466     return et;
 467   }
 468
 469   //================================================================
 470
 471   CORBA::TypeCode_ptr const
 472   BasicTypeTraits<CORBA::AnySeq>::tc_value = CORBA::_tc_AnySeq;
 473
 474   CORBA::TCKind const
 475   BasicTypeTraits<CORBA::AnySeq>::tckind_value = CORBA::tk_sequence;
 476
 477   BasicTypeTraits<CORBA::AnySeq>::return_type
 478   BasicTypeTraits<CORBA::AnySeq>::convert (extract_type& et)
 479   {
 480     return et;
 481   }
 482 }
 483
 484 TAO_END_VERSIONED_NAMESPACE_DECL
 485