アセンブリについてはよくわかりませんが、x86 には平方根の命令があると確信していますか? 平方根関数を泡でうまく機能させようとしていますが、何度も実行すると、見つけた関数が何らかの形で動かなくなります。
: sqrt-closer ( square guess -- square guess adjustment)
2dup / over - 2 /
;
: sqrt ( square -- root )
1 begin
sqrt-closer dup
while + repeat
drop nip ;