Trying to get my code to run in ML

[rTreutlein]

The following file passes all test using HE but fails with ML (note you will need the whole folder to get it to run)
https://github.com/rTreutlein/chaining/blob/argset-chaining/experimental/argset-chaining/chainer.metta

[TeamSPoon]

H-E

> !(unique-atom ($a $a $b $b))
[($a)]
> !(unique-atom ($a $a $b 2 3))
[($a)]
> !(unique-atom (3 2 $a $a $b))
[(3 2)]

M-E

> !(unique-atom ($a $a $b $b))
[($a $b)]
> !(unique-atom ($a $a $b 2 3))
[($a $b 2 3)]
>!(unique-atom (3 2 $a $a $b))
[(3 2 $a $b)]