? 0h+BINTOC(0.0,"8"), 0h+BINTOC(0.0,"8S")

>CLEAR
>? 0h+BINTOC($0,"8"),0h+BINTOC($0,"8S")
>? "EXPECTED FALSE :",0h+BINTOC($0,"8")==0h+BINTOC($0,"8S")
>* Of course, then the next fire a overflow error
>? CTOBIN(BINTOC($0,"8S"),"YS")
>* and next return a complement value
>? CTOBIN(BINTOC($1,"8S"),"YS")
>