summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/xetexdir
diff options
context:
space:
mode:
authorJonathan Kew <jfkthame@googlemail.com>2007-01-05 15:57:53 +0000
committerJonathan Kew <jfkthame@googlemail.com>2007-01-05 15:57:53 +0000
commitbe0e862735b1b8394c5da9b0149d401381451c96 (patch)
tree270166bacf0bf562af38ecb91a533f56fc204f47 /Build/source/texk/web2c/xetexdir
parentae2f905a0939bcc67e4b33392b976149bb7d2b24 (diff)
fix processing of radical in opentype math fonts
git-svn-id: svn://tug.org/texlive/trunk@3157 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/xetexdir')
-rw-r--r--Build/source/texk/web2c/xetexdir/xetex-otmath.ch16
1 files changed, 8 insertions, 8 deletions
diff --git a/Build/source/texk/web2c/xetexdir/xetex-otmath.ch b/Build/source/texk/web2c/xetexdir/xetex-otmath.ch
index 2df2af6652e..e7ea126d21c 100644
--- a/Build/source/texk/web2c/xetexdir/xetex-otmath.ch
+++ b/Build/source/texk/web2c/xetexdir/xetex-otmath.ch
@@ -408,19 +408,19 @@ var x,@!y:pointer; {temporary registers for box construction}
f:internal_font_number;
rule_thickness:scaled; {rule thickness}
@!delta,@!clr:scaled; {dimensions involved in the calculation}
-begin f:=fam_fnt(3 + cur_size);
+begin f:=fam_fnt(small_fam(left_delimiter(q)) + cur_size);
if is_ot_font(f) then rule_thickness:=get_ot_math_constant(f,radicalRuleThickness)
else rule_thickness:=default_rule_thickness;
x:=clean_box(nucleus(q),cramped_style(cur_style));
if is_ot_font(f) then begin
-if cur_style<text_style then {display style}
- clr:=rule_thickness+(abs(math_x_height(cur_size)) div 4)
-else begin clr:=rule_thickness; clr:=clr + (abs(clr) div 4);
- end;
+ if cur_style<text_style then {display style}
+ clr:=get_ot_math_constant(f,radicalDisplayStyleVerticalGap)
+ else clr:=get_ot_math_constant(f,radicalVerticalGap);
end else begin
-if cur_style<text_style then {display style}
- clr:=get_ot_math_constant(f,radicalDisplayStyleVerticalGap)
-else clr:=get_ot_math_constant(f,radicalVerticalGap);
+ if cur_style<text_style then {display style}
+ clr:=rule_thickness+(abs(math_x_height(cur_size)) div 4)
+ else begin clr:=rule_thickness; clr:=clr + (abs(clr) div 4);
+ end;
end;
y:=var_delimiter(left_delimiter(q),cur_size,height(x)+depth(x)+clr+rule_thickness);
if is_ot_font(f) then begin