Return to pa_vcaller_wrapper.h CVS log

Up to [parser3project] / parser3 / src / types

Copyright year updated, websites links changed to https://

/** @file
	Parser: VCaller class decl. as wrapper for $caller access

	Copyright (c) 2001-2026 Art. Lebedev Studio (https://www.artlebedev.com)
*/

#ifndef PA_VCALLER_WRAPPER_H
#define PA_VCALLER_WRAPPER_H

#include "pa_value.h"
#include "pa_vmethod_frame.h"

#define IDENT_PA_VCALLER_WRAPPER_H "$Id: pa_vcaller_wrapper.h,v 1.6 2026/04/25 13:38:46 moko Exp $"

class VCallerWrapper: public Value {
	VMethodFrame &fcaller;

public: // Value

	override const char* type() const { return "caller"; }

	/// VCaller: transparent
	override VStateless_class* get_class() { return caller().get_class(); }

	/// VCaller: transparent
	override VStateless_class* base() { return caller().base(); }

	/// VCaller: empty string to disable $backup[$caller]
	override const String* get_string() { return &String::Empty; }

	/// VCaller: method or transparent
	override Value* get_element(const String& aname) {
		if(SYMBOLS_EQ(aname,METHOD_SYMBOL))
			return caller().method.get_vjunction(caller().self());

		return caller().get_element(aname);
	}

	/// VCaller: transparent
	override const VJunction* put_element(const String& aname, Value* avalue) { return caller().put_element(aname, avalue); }

public: // usage

	VCallerWrapper(VMethodFrame &acaller): fcaller(acaller) {}

	VMethodFrame &caller() { return fcaller; }

};

#endif