unison/unison-src/tests/tictactoe0-npe.u

-- board piece
structural type P = X | O | E

structural type Board = Board P P P P P P P P P

use Board Board
use P O X E

whatevs a b c = a

b = Board X O X O X X O E X
x = 1
y = 2
z = 3

ex = match b with
  Board a b c d e f g h i -> a
fix off-by-two error in dataConstructorish 2018-09-04 21:27:59 +03:00			`-- board piece`
fixes tests and transcripts 2021-08-24 21:33:27 +03:00			`structural type P = X \| O \| E`
fix off-by-two error in dataConstructorish 2018-09-04 21:27:59 +03:00
fixes tests and transcripts 2021-08-24 21:33:27 +03:00			`structural type Board = Board P P P P P P P P P`
fix off-by-two error in dataConstructorish 2018-09-04 21:27:59 +03:00
`use . Nat` now works to give `.Nat` the local name `Nat`, also simplified `use` statement parser 2019-07-03 03:18:11 +03:00			`use Board Board`
fix off-by-two error in dataConstructorish 2018-09-04 21:27:59 +03:00			`use P O X E`

			`whatevs a b c = a`

			`b = Board X O X O X X O E X`
			`x = 1`
			`y = 2`
			`z = 3`

replace `case .. of` syntax with `match .. with` 2020-02-07 05:29:43 +03:00			`ex = match b with`
fix off-by-two error in dataConstructorish 2018-09-04 21:27:59 +03:00			`Board a b c d e f g h i -> a`