UM* — 부호 없는 곱셈

UM* — 부호 없는 곱셈

UM*(u-m-star)는 u1u2를 곱해 부호 없는 더블 셀 곱 ud를 구하는 코어 단어예요.

출처: UM* — Forth 2012 Standard

본문

스택 효과

( u1 u2 -- ud )

설명

u1u2를 곱해 부호 없는 더블 셀 곱 ud를 구해요. 모든 비트가 유의미한 부호 없는 곱이에요.

테스트 (Testing)

T{       0       0 UM* ->       0       0 }T
T{       0       1 UM* ->       0       0 }T
T{       1       0 UM* ->       0       0 }T
T{       1       1 UM* ->       1       0 }T
T{       2       1 UM* ->       2       0 }T
T{       1       2 UM* ->       2       0 }T
T{       3       3 UM* ->       9       0 }T
T{ MAX-UINT 2 UM* -> MAX-UINT 1- 1 }T
T{ MAX-UINT MAX-UINT UM* -> 1 0 MAX-UINT 2* 1+ }T
T{ MIN-INT   MIN-INT   UM* -> 0 0 1 0 }T

더 알아보기 (Learn more)

출처: UM* — Forth 2012 Standard