Sphpeme\Env\StdEnv

Complexity

Total Complexity

20

Size/Duplication

Total Lines	106
Duplicated Lines	0 %

Coupling/Cohesion

Components	0
Dependencies	1

Test Coverage

Coverage

100%

Importance

Changes

0

15 Methods

Rating	Name	Duplication	Size	Complexity
A	_list()	0	4	1
A	car()	0	4	1
A	cdr()	0	4	1
A	display()	0	8	3
A	newline()	0	4	1
A	add()	0	6	2
A	subtract()	0	6	2
A	multiply()	0	6	2
A	divide()	0	4	1
A	gt()	0	4	1
A	lt()	0	4	1
A	gte()	0	4	1
A	lte()	0	4	1
A	isEqual()	0	4	1
A	isEquiv()	0	4	1

<?php

namespace Sphpeme\Env;


class StdEnv implements EnvInterface
{
    use MappedEnvTrait;

    const MAPPING = [
        '#' => '+',
        '+' => 'add',
        '-' => 'subtract',
        '*' => 'multiply',
        '/' => 'divide',
        '>' => 'gt',
        '<' => 'lt',
        '<=' => 'lte',
        '>=' => 'gte',
        'eq?' => 'isEqual',
        'eqv?' => 'isEquiv',
        'list' => '_list'
    ];

    public $pi = M_PI;

    public function _list(...$args)
    {
        return $args;
    }

    public function car(array $list)
    {
        return current($list);
    }

    public function cdr(array $list)
    {
        return \array_slice($list, 1);
    }

    public function display($arg)
    {
        if (is_scalar($arg) || method_exists($arg, '__toString')) {
            echo $arg;
        } else {
            var_export($arg);
        }
    }

    public function newline()
    {
        echo PHP_EOL;
    }

    public function add($first, ...$rest)
    {
        return $first + (\count($rest) > 1
                ? $this->add(...$rest)
                : current($rest));
    }

    public function subtract($first, ...$rest)
    {
        return $first - (\count($rest) > 1
                ? $this->add(...$rest)
                : current($rest));
    }

    public function multiply($first, ...$rest)
    {
        return $first * (\count($rest) > 1
                ? $this->multiply(...$rest)
                : current($rest));
    }

    public function divide($a, $b)
    {
        return $a / $b;
    }

    public function gt($a, $b)
    {
        return $a > $b;
    }

    public function lt($a, $b)
    {
        return $a < $b;
    }

    public function gte($a, $b)
    {
        return $a >= $b;
    }

    public function lte($a, $b)
    {
        return $a <= $b;
    }

    public function isEqual($a, $b)
    {
        return $a == $b;
    }

    public function isEquiv($a, $b)
    {
        return $a === $b;
    }
}