# New Ticket Created by Richard Hainsworth # Please include the string: [perl #50942] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=50942 >
<parrot_dir>/examples/sdl/blue_font.pir works but produces random colors even though it should be blue while .../blue_rect.pir gives a solid blue The native SDL routine for font needs to have a color integer (as for rectangles) not a color pmc (as currently). The signature for the font rendering routines needs to be changed too. Files changed: <parrot_dir>/runtime/parrot/library/SDL.pir - change to _init_ttf - change to signatures for TTF_Render* functions. <parrot_dir>/runtime/parrot/library/SDL/Font.pir - change render_text method Richard Hainsworth
143c143 < color = color_pmc.'color'() --- > color = color_pmc
242c242 < dlfunc nci_sub, ttf_lib, 'TTF_RenderText_Solid', 'pptp' --- > dlfunc nci_sub, ttf_lib, 'TTF_RenderText_Solid', 'ppti' 244c244 < dlfunc nci_sub, ttf_lib, 'TTF_RenderUTF8_Solid', 'pptp' --- > dlfunc nci_sub, ttf_lib, 'TTF_RenderUTF8_Solid', 'ppti' 248c248 < dlfunc nci_sub, ttf_lib, 'TTF_RenderUNICODE_Solid', 'pptp' --- > dlfunc nci_sub, ttf_lib, 'TTF_RenderUNICODE_Solid', 'ppti'
