DABS

( d -- ud )

スタックの先頭にある符号付き2セル整数の絶対値を得る

code: 実装方法

: DABS DUP 0> IF DNEGATE THEN ;