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 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 /*
  55 RefCountPtr< const Lang::Value >
  56 Lang::Value::transformed( const Shapes::Transform & transform, Kernel::ValueRef self ) const
  57 {
  58         throw Exceptions::CoreTypeMismatch( strrefdup( "<transform>" ), 1, this->getTypeName( ), Shapes::SEVERAL_TYPES );
  59 }
  60
  61 RefCountPtr< const Lang::Value >
  62 Lang::Value::transformed( const Lang::Transform3D & transform, Kernel::ValueRef self ) const
  63 {
  64         throw Exceptions::CoreTypeMismatch( strrefdup( "<transform3D>" ), 1, this->getTypeName( ), Shapes::SEVERAL_TYPES );
  65 }
  66 */
  67
  68 RefCountPtr< const char >
  69 Lang::Value::getTypeName( ) const
  70 {
  71         return this->getClass( )->getPrettyName( );
  72 }
  73
  74
  75 DISPATCHIMPL( NoOperatorOverloadValue );
  76
  77 DISPATCHIMPL( NoOperatorOverloadGeometric2D );
  78
  79
  80 //RefCountPtr< const Lang::Class > Lang::NoOperatorOverloadValue::TypeID( new Lang::SystemFinalClass( strrefdup( "NonDispatching" ) ) );
  81 //TYPEINFOIMPL( NoOperatorOverloadValue );
  82
  83 RefCountPtr< const Lang::Class > Lang::Geometric2D::TypeID = NullPtr< const Lang::Class >( );   /* The value is set in main */
  84 TYPEINFOIMPL( Geometric2D );
  85
  86 RefCountPtr< const Lang::Class > Lang::Geometric3D::TypeID = NullPtr< const Lang::Class >( );   /* The value is set in main */
  87 TYPEINFOIMPL( Geometric3D );
  88
  89
  90 Kernel::VariableHandle
  91 Helpers::newValHandle( const Lang::Value * val )
  92 {
  93         return Kernel::VariableHandle( new Kernel::Variable( RefCountPtr< const Lang::Value >( val ) ) );
  94 }
  95