all repos — min @ 880bd397e25c6a1de1f924325b6f1b423b2189ed

A small but practical concatenative programming language.

tests/crypto.min

 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
 
'test require :test
;;;

"crypto" *test/describe

  ("test" md4 "db346d691d7acc4dc2625db19f9e3f52" ==) *test/assert

  ("test" md5 "098f6bcd4621d373cade4e832627b4f6" ==) *test/assert

  ("test" sha1 "a94a8fe5ccb19ba61c4c0873d391e987982fbbd3" ==) *test/assert

  ("test" sha224 "90a3ed9e32b2aaf4c61c410eb925426119e1a9dc53d4286ade99a809" ==) *test/assert

  ("test" sha256 "9f86d081884c7d659a2feaa0c55ad015a3bf4f1b2b0b822cd15d6c15b0f00a08" ==) *test/assert

  ("test" sha384 "768412320f7b0aa5812fce428dc4706b3cae50e02a64caa16a782249bfe8efc4b7ef1ccb126255d196047dfedf17a0a9" ==) *test/assert

  ("test" sha512 "ee26b0dd4af7e749aa1a8ee3c10ae9923f618980772e473f8819a5d4940e0db27ac185f8a0e1d5f84f88bc887fd67b143732c304cc5fa9ad8e6f57f50028a8ff" ==) *test/assert

  ("test" encode decode "test" ==) *test/assert

  ("test" "test" aes "test" aes strip "test" ==) *test/assert
  
  *test/report
  clear-stack