Acme-Syntax-Python

 view release on metacpan or  search on metacpan

t/01-function.t  view on Meta::CPAN

use lib './lib';
use Acme::Syntax::Python;
from Data::Dumper import Dumper, DumperX;
import Test::More;

def test:
    ok(1, "Functions Working");

def test2: ok(1, "Single Line Functions Work Too");

def test3($var1):

t/02-lamba.t  view on Meta::CPAN

use lib './lib';
use Acme::Syntax::Python;
import Test::More;

my $sub = lambda: (2 * 10);

my $sub2 = lambda($var1): ($var1 * 5);

ok($sub->() == 20, "Lambas Work!");
ok($sub2->(2) == 10, "Lambda with Params!");

t/03-if-else.t  view on Meta::CPAN

use lib './lib';
use Acme::Syntax::Python;
import Test::More;

def test($var1):
    if ($var1 == 1):
        ok(1, "If == 1");
    elif ($var1 == 2):
        ok(1, "If == 2");
    else:
        ok(1, "If doesn't equal 1 or 2");

t/04-class.t  view on Meta::CPAN

use lib './lib';
use strict;
use warnings;
use Acme::Syntax::Python;
import Test::More;
class Test::Class:
    import Test::More;
    def __init__:
        $self->{test} = "Hello";

    def method1($self):

t/05-alltogether.t  view on Meta::CPAN

use lib './lib';
use Acme::Syntax::Python;
import Test::More tests => 5;

class Client:
    def __init__($client_id):
        $self->{_client_id} = $client_id;
    def set_client_id($self, $client_id):
        $self->{_client_id} = $client_id;
    def client_id($self):
        return $self->{_client_id};