mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-11-22 18:32:09 +00:00
58b04ba77c
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@342 4df02467-bbd4-4a76-a152-e7ce94205b78
23 lines
443 B
Plaintext
23 lines
443 B
Plaintext
|
|
!macro a @r {
|
|
!if @r != 1 {
|
|
!error "assertion failed"
|
|
}
|
|
}
|
|
|
|
squares = [1, 4, 9]
|
|
emptylist = []
|
|
primes = [2, 3, 5, 7]
|
|
+a primes + emptylist + squares == [2,3,5,7,1,4,9]
|
|
|
|
somestring = "Arthur"
|
|
emptystring = ""
|
|
otherstring = "Ford"
|
|
+a otherstring + emptystring + somestring == "FordArthur"
|
|
|
|
collection = []
|
|
!for c in "Trillian" {
|
|
!set collection = collection + [c]
|
|
}
|
|
+a collection == [84, 114, 105, 108, 108, 105, 97, 110]
|