Moving some common code for the VM out of BlockChain.hs to VM.hs, where it can be shared by the VM CALL function as well as the blockchain insertion code.