More work on DOES> ;CODE etc.