simple forth interpreter