% This change file has to be applied after the web2c change file % to revert some changes which make assumtion on glue_ratio being % real. Apart from the following change, they are all related to % mltex. @x { The Unix |pc| folks removed this restriction with a remark that invalid bit patterns were vanishingly improbable, so we follow their example without really understanding it. |if abs(mem[p+glue_offset].int)<@'4000000 then print('?.?')| |else| } if fabs(g)>float_constant(20000) then begin end; @y @z @x @!base_slant,@!accent_slant:real; {amount of slant} @y @!base_slant,@!accent_slant:scaled; {amount of slant} @z @x base_slant:=slant(f)/float_constant(65536); @^real division@> @y base_slant:=slant(f); @z @x delta:=round((base_width-accent_width)/float_constant(2)+ base_height*base_slant-base_x_height*accent_slant); @^real multiplication@> @^real addition@> @y delta:=x_over_n(base_width-accent_width,2) +xn_over_d(base_height,base_slant,unity) -xn_over_d(base_x_height,accent_slant,unity); @z