aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/bm-clear.asm
blob: 4cffa1d0c5f1b2328287ef0d8c905cc2a95e3e3f (plain)
1
2
3
4
5
6
;Z CCLRB	c c-addr -- 	clear bits in memory byte
		CODEHEADER(XT_BM_CLEAR,8,"bm-clear")
		MOV		@PSP+,W
		BIC.B	W,0(TOS)
		MOV		@PSP+,TOS
		NEXT