Patch title: Release 92 bulk changes
Abstract:
File: /graphic/vector/font.pli
Key:
    Removed line
    Added line
   
abstract
  [Loading and rendering a PostScript Type 1 font]


abstract
  [Loading and rendering a PostScript Type 1 font]


method f bbox text kerning x0 y0 x1 y1
  arg Font f ; arg Str text ; arg Address kerning ; arg_w Fl
method f bbox text kerning length x0 y0 x1 y1
  arg Font f ; arg Str text ; arg Address kerning ; arg Float length ; arg_w Float x0 y0 x1 y1
  if text:len<>0
    var Vector2 v := f vector text:characters text:len 1 ker
    x0 := 0 ; y0 := f y0 ; x1 := v x ; y1 := f y1 # FIXME
  else
    x0 := 0 ; y0 := 0 ; x1 := 0 ; y1 := 0
  if text:len<>0
    var Vector2 v := f vector text:characters text:len 1 ker
    x0 := 0 ; y0 := f y0 ; x1 := v x ; y1 := f y1 # FIXME
  else
    x0 := 0 ; y0 := 0 ; x1 := 0 ; y1 := 0
  if length<>undefined
    x1 := length


method f bbox text kerning x0 y0 x1 y1
  arg Font f ; arg Str32 text ; arg Address kerning ; arg_w 
method f bbox text kerning length x0 y0 x1 y1
  arg Font f ; arg Str32 text ; arg Address kerning ; arg Float length ; arg_w Float x0 y0 x1 y1
  if text:len<>0
    var Vector2 v := f vector text:characters text:len 4 ker
    x0 := 0 ; y0 := f y0 ; x1 := v x ; y1 := f y1 # FIXME
  else
    x0 := 0 ; y0 := 0 ; x1 := 0 ; y1 := 0
  if text:len<>0
    var Vector2 v := f vector text:characters text:len 4 ker
    x0 := 0 ; y0 := f y0 ; x1 := v x ; y1 := f y1 # FIXME
  else
    x0 := 0 ; y0 := 0 ; x1 := 0 ; y1 := 0
  if length<>undefined
    x1 := length





#-----------------------------------------------------------
# Drawing text



#-----------------------------------------------------------
# Drawing text