<?php namespace eMacros\Runtime\Symbol;
use eMacros\Applicable; use eMacros\Scope; use eMacros\GenericList;
class SymbolLookup implements Applicable { /** * Obtains a symbol value from current environment * Usage: (lookup "_value") * Returns: mixed * (non-PHPdoc) * @see \eMacros\Applicable::apply() */ public function apply(Scope $scope, GenericList $arguments) { if (count($arguments) == 0) { throw new \BadFunctionCallException("SymbolLookup: No parameters found."); } $ref = $arguments[0]->evaluate($scope); if (!is_string($ref) || empty($ref)) { throw new \InvalidArgumentException("SymbolLookup: Symbol must be specified as a non-empty string."); } if (!array_key_exists($ref, $scope->symbols)) { throw new \InvalidArgumentException(sprintf("SymbolLookup: Symbol %s does not exists on current environment.", $ref)); } return $scope->symbols[$ref]; } } ?>
|