enable writing tests in the contract file

[z80dev]

use a macro called test

example

(defn getNum [] :uint256 :external
  4)

(test
  (assert 
    (= (.getNum self) 4)))

this would be really easy for a contract with no constructor args or external calls.