source/shapesvalue.cc

   1 /* This file is part of Shapes.
   2  *
   3  * Shapes is free software: you can redistribute it and/or modify
   4  * it under the terms of the GNU General Public License as published by
   5  * the Free Software Foundation, either version 3 of the License, or
   6  * any later version.
   7  *
   8  * Shapes is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  *
  13  * You should have received a copy of the GNU General Public License
  14  * along with Shapes.  If not, see <http://www.gnu.org/licenses/>.
  15  *
  16  * Copyright 2008, 2013 Henrik Tidefelt
  17  */
  18
  19 #include "shapesvalue.h"
  20 #include "shapesexceptions.h"
  21 #include "consts.h"
  22 #include "classtreemacros.h"
  23
  24 #if DISPATCHSTYLE == DISPATCHSTYLE_VOID
  25 #include "globals.h"
  26 #elif DISPATCHSTYLE == DISPATCHSTYLE_CASE
  27 #include "astexpr.h"
  28 #endif
  29
  30 using namespace Shapes;
  31
  32
  33 Lang::Value::Value( )
  34         : node_( 0 )
  35 { }
  36
  37 Lang::Value::~Value( )
  38 { }
  39
  40 DISPATCHBASEIMPL
  41
  42 Kernel::VariableHandle
  43 Lang::Value::getField( const char * fieldID, const RefCountPtr< const Lang::Value > & selfRef ) const
  44 {
  45         throw Exceptions::ElementaryWithout( Exceptions::ElementaryWithout::VALUE, Exceptions::ElementaryWithout::FIELD, getTypeName( ) );
  46 }
  47
  48 void
  49 Lang::Value::show( std::ostream & os ) const
  50 {
  51         os << "(unable to display)" ;
  52 }
  53
  54 RefCountPtr< const char >
  55 Lang::Value::getTypeName( ) const
  56 {
  57         return this->getClass( )->getPrettyName( );
  58 }
  59
  60
  61 Lang::Void::Void( )
  62 { }
  63
  64 RefCountPtr< const Lang::Class > Lang::Void::TypeID( new Lang::SystemFinalClass( strrefdup( "Void" ) ) );
  65 TYPEINFOIMPL( Void );
  66
  67 void
  68 Lang::Void::show( std::ostream & os ) const
  69 { }
  70
  71
  72 DISPATCHIMPL( NoOperatorOverloadValue );
  73
  74 DISPATCHIMPL( NoOperatorOverloadGeometric2D );
  75
  76
  77 //RefCountPtr< const Lang::Class > Lang::NoOperatorOverloadValue::TypeID( new Lang::SystemFinalClass( strrefdup( "NonDispatching" ) ) );
  78 //TYPEINFOIMPL( NoOperatorOverloadValue );
  79
  80 RefCountPtr< const Lang::Class > Lang::Geometric2D::TypeID = NullPtr< const Lang::Class >( );   /* The value is set in main */
  81 TYPEINFOIMPL( Geometric2D );
  82
  83 RefCountPtr< const Lang::Class > Lang::Geometric3D::TypeID = NullPtr< const Lang::Class >( );   /* The value is set in main */
  84 TYPEINFOIMPL( Geometric3D );
  85
  86
  87 Lang::Hot::Hot::Hot( )
  88 { }
  89
  90 Lang::Hot::~Hot( )
  91 { }
  92
  93 RefCountPtr< const Lang::Class > Lang::Hot::TypeID( new Lang::SystemFinalClass( strrefdup( "Hot" ) ) );
  94 TYPEINFOIMPL( Hot );
  95
  96
  97 Kernel::VariableHandle
  98 Helpers::newValHandle( const Lang::Value * val )
  99 {
 100         return Kernel::VariableHandle( new Kernel::Variable( RefCountPtr< const Lang::Value >( val ) ) );
 101 }
 102