Subversion Repositories Kolibri OS

/** \file deffile.h deffiles, which speed up loading.

 *  This module adds support for loading files which specify

 *  which script file to look for when trying to use a specific

 *  function.

 */

#ifndef __deffile_h__

#define __deffile_h__

#include "yacasbase.h"

#include "lisphash.h"

/** LispDefFile represents one file that can be loaded just-in-time.

 */

class LispDefFile : public YacasBase

{

public:

    LispDefFile(LispString * aFile);

    LispDefFile(const LispDefFile& aOther);

    ~LispDefFile();

    void SetLoaded();

    inline LispBoolean IsLoaded();

    inline LispString * FileName();

    LispStringSmartPtr iFileName;

    LispBoolean   iIsLoaded;

};

/** LispDefFiles maintains an array of files that can be defloaded.

 * When the user invokes a DefLoad on a file, an entry is added to the

 * array of deffiles in the LispEnvironment class. When the function

 * is called, and there is no body of rules defined for this function,

 * the engine looks up the correct file to load from this associated

 * has class.

 */

class LispEnvironment;

class LispDefFiles : public LispAssociatedHash

{

public:

    LispDefFile* File(LispString * aFileName);

};

void LoadDefFile(LispEnvironment& aEnvironment, LispString * aFileName);

#include "deffile.inl"

#endif