$npj="%l6";
$tpj="%l7";
-$fname="bn_mul_mont";
+$fname="bn_mul_mont_int";
$code=<<___;
.section ".text",#alloc,#execinstr
___
\f
########
-######## bn_sqr_mont gives up to 20% improvement over above code
+######## .Lbn_sqr_mont gives up to 20% *overall* improvement over
+######## code without following dedicated squaring procedure.
########
$sbit="%i2"; # re-use $bp!