strykelang 0.8.13

A highly parallel Perl 5 interpreter written in Rust
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99

//! Binary and unary operator expression shapes in the AST.

use stryke::ast::{BinOp, ExprKind, StmtKind, UnaryOp};

#[test]
fn binop_subtract() {
    let p = stryke::parse("9 - 4").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::BinOp { op, .. } = &e.kind else {
        panic!("binop");
    };
    assert_eq!(*op, BinOp::Sub);
}

#[test]
fn binop_multiply() {
    let p = stryke::parse("3 * 4").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::BinOp { op, .. } = &e.kind else {
        panic!("binop");
    };
    assert_eq!(*op, BinOp::Mul);
}

#[test]
fn binop_divide() {
    let p = stryke::parse("8 / 2").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::BinOp { op, .. } = &e.kind else {
        panic!("binop");
    };
    assert_eq!(*op, BinOp::Div);
}

#[test]
fn binop_modulo() {
    let p = stryke::parse("7 % 3").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::BinOp { op, .. } = &e.kind else {
        panic!("binop");
    };
    assert_eq!(*op, BinOp::Mod);
}

#[test]
fn binop_power() {
    let p = stryke::parse("2 ** 8").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::BinOp { op, .. } = &e.kind else {
        panic!("binop");
    };
    assert_eq!(*op, BinOp::Pow);
}

#[test]
fn unary_numeric_negate() {
    let p = stryke::parse("-15").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::UnaryOp { op, .. } = &e.kind else {
        panic!("unary");
    };
    assert_eq!(*op, UnaryOp::Negate);
}

#[test]
fn unary_logical_not_bang() {
    let p = stryke::parse("!0").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::UnaryOp { op, .. } = &e.kind else {
        panic!("unary");
    };
    assert_eq!(*op, UnaryOp::LogNot);
}

#[test]
fn unary_bitwise_not_tilde() {
    let p = stryke::parse("~0").expect("parse");
    let StmtKind::Expression(e) = &p.statements[0].kind else {
        panic!("expr stmt");
    };
    let ExprKind::UnaryOp { op, .. } = &e.kind else {
        panic!("unary");
    };
    assert_eq!(*op, UnaryOp::BitNot);
}