schpack.cpp

Go to the documentation of this file.

// +-------------------------------------------------------------------------+
// |               I__n__t__e__L__i__b           0.6.10 development          |
// | Copyright (c) Andrey Vikt. Stolyarov <crocodil_AT_croco.net> 2000-2007. |
// |                                                                         |
// | This is free software. The library part is available under              |
// |                               GNU LESSER GENERAL PUBLIC LICENSE v.2.1.  |
// | GNU LGPL v2.1 is found in docs/gnu_gpl2.txt,  or at  http://www.gnu.org |
// |     Please see also docs/readme.txt and visit http://www.intelib.org    |
// |                                                                         |
// | !!! THERE IS NO WARRANTY OF ANY KIND, NEITHER EXPRESSED NOR IMPLIED !!! |
// +-------------------------------------------------------------------------+




#include <string.h>
#include <ctype.h>

#include "schsymb.hpp"

#include "schpack.hpp"

// SchExpressionPackage

IntelibTypeId
SchExpressionPackage::TypeId(&SExpressionHashPackage::TypeId);

SchExpressionPackage::SchExpressionPackage()
    : SExpressionHashPackage(TypeId)
{}

SchExpressionPackage::SchExpressionPackage(const SchPackage& par)
    : SExpressionHashPackage(TypeId, par)
{}

SchExpressionPackage::~SchExpressionPackage()
{}

SReference SchExpressionPackage::CreateNewSymbolObject(const char *nm) const
{
    return SReference(new SchExpressionSymbol(nm));
}

// SchExpressionPackageIntelib

SchExpressionPackageIntelib::SchExpressionPackageIntelib()
    : SchExpressionPackage()
{
    Import(TheSchLibraryProvidedSymbols.Quote);
}

---