diff --git a/src/aliases/,aliases_cpu.s b/src/aliases/,aliases_cpu.s index faef48c8..4a499d31 100644 --- a/src/aliases/,aliases_cpu.s +++ b/src/aliases/,aliases_cpu.s @@ -136,3 +136,10 @@ bvc *+5 jmp @dst } } + + +; 32-bit integer constant in big endian order + +!macro be32 @val { + !byte (@val >> 24) & $FF, (@val >> 16) & $FF, (@val >> 8) & $FF, (@val) & $FF +} diff --git a/src/basic/math_consts/bf16.table_power_of_ten.s b/src/basic/math_consts/bf16.table_power_of_ten.s new file mode 100644 index 00000000..310b3353 --- /dev/null +++ b/src/basic/math_consts/bf16.table_power_of_ten.s @@ -0,0 +1,24 @@ +;; #LAYOUT# STD * #TAKE +;; #LAYOUT# X16 BASIC_0 #TAKE-OFFSET 2000 +;; #LAYOUT# * BASIC_0 #TAKE +;; #LAYOUT# * * #IGNORE + +; This file is under the MIT license, it contains code released by Microsoft Corporation. +; See LICENSE for more information. + +; Math package - table of powers of ten +; +; This is verified to be identical to the original Microsoft implementation where it was named FOUTBL + + +FOUTBL: + +be32 -100000000 + +be32 10000000 + +be32 -1000000 + +be32 100000 + +be32 -10000 + +be32 1000 + +be32 -100 + +be32 10 + +be32 -1 +FDCEND: diff --git a/tools/similarity.c b/tools/similarity.c index ef5612e1..90f262be 100644 --- a/tools/similarity.c +++ b/tools/similarity.c @@ -29,7 +29,7 @@ unsigned short microsoft_basic_chunks[NUM_CHUNKS * 2] = { 0xB983, 0xB9BB, 0xBA28, 0xBCF2, 0xBD7E, 0xBD90, - 0xBF11, 0xBF15, + 0xBF11, 0xBF39, 0xBFB4, 0xBFBE, };