seqlings 3.0.7

Interactive exercises for learning Seq, a stack-based programming language
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

: to-hex ( String -- String )
    encoding.hex-encode
;

: from-hex ( String -- String Bool )
    encoding.hex-decode
;

: test-hex ( -- )
    "Hello" to-hex
    "48656c6c6f" test.assert-eq

    "576f726c64" from-hex
    test.assert
    "World" test.assert-eq

    "48454C4C4F" from-hex
    test.assert
    "HELLO" test.assert-eq

    "A" to-hex
    "41" test.assert-eq
;