Machine apply Forth primitive