← Back to branch summary

~ubuntu-branches/ubuntu/trusty/rgtk2/trusty

« back to all changes in this revision

Viewing changes to R/cairoFuncs.R

  • Committer: Bazaar Package Importer
  • Author(s): Dirk Eddelbuettel
  • Date: 2010-11-03 11:35:46 UTC
  • mfrom: (1.3.7 upstream)
  • Revision ID: james.westby@ubuntu.com-20101103113546-a7fi7jdxdebp0tw1
Tags: 2.20.1-1
* New upstream release

* debian/control: Set (Build-)Depends: to current R version
* debian/control: Set Standards-Version: to current version 

Show diffs side-by-side

added added

removed removed

Lines of Context:
R/cairoFuncs.R
1164
1164
} 
1165
1165
 
1166
1166
 
1167
 
cairoSurfaceReference <-
1168
 
function(surface)
1169
 
{
1170
 
  checkPtrType(surface, "CairoSurface")
1171
 
 
1172
 
  w <- .RGtkCall("S_cairo_surface_reference", surface, PACKAGE = "RGtk2")
1173
 
 
1174
 
  return(w)
1175
 
} 
1176
 
 
1177
 
 
1178
1167
cairoSurfaceDestroy <-
1179
1168
function(surface)
1180
1169
{
2578
2567
  return(w)
2579
2568
} 
2580
2569
 
 
2570
 
 
2571
cairoToyFontFaceCreate <-
 
2572
function(family, slant, weight)
 
2573
{
 
2574
  family <- as.character(family)
 
2575
  
 
2576
  
 
2577
 
 
2578
  w <- .RGtkCall("S_cairo_toy_font_face_create", family, slant, weight, PACKAGE = "RGtk2")
 
2579
 
 
2580
  return(w)
 
2581
} 
 
2582
 
 
2583
 
 
2584
cairoToyFontFaceGetFamily <-
 
2585
function(font.face)
 
2586
{
 
2587
  checkPtrType(font.face, "CairoFontFace")
 
2588
 
 
2589
  w <- .RGtkCall("S_cairo_toy_font_face_get_family", font.face, PACKAGE = "RGtk2")
 
2590
 
 
2591
  return(w)
 
2592
} 
 
2593
 
 
2594
 
 
2595
cairoToyFontFaceGetSlant <-
 
2596
function(font.face)
 
2597
{
 
2598
  checkPtrType(font.face, "CairoFontFace")
 
2599
 
 
2600
  w <- .RGtkCall("S_cairo_toy_font_face_get_slant", font.face, PACKAGE = "RGtk2")
 
2601
 
 
2602
  return(w)
 
2603
} 
 
2604
 
 
2605
 
 
2606
cairoToyFontFaceGetWeight <-
 
2607
function(font.face)
 
2608
{
 
2609
  checkPtrType(font.face, "CairoFontFace")
 
2610
 
 
2611
  w <- .RGtkCall("S_cairo_toy_font_face_get_weight", font.face, PACKAGE = "RGtk2")
 
2612
 
 
2613
  return(w)
 
2614
} 
 
2615
 
 
2616
 
 
2617
cairoSurfaceGetFallbackResolution <-
 
2618
function(surface)
 
2619
{
 
2620
  checkPtrType(surface, "CairoSurface")
 
2621
 
 
2622
  w <- .RGtkCall("S_cairo_surface_get_fallback_resolution", surface, PACKAGE = "RGtk2")
 
2623
 
 
2624
  return(invisible(w))
 
2625
} 
 
2626
 
 
2627
 
 
2628
cairoSurfaceHasShowTextGlyphs <-
 
2629
function(surface)
 
2630
{
 
2631
  checkPtrType(surface, "CairoSurface")
 
2632
 
 
2633
  w <- .RGtkCall("S_cairo_surface_has_show_text_glyphs", surface, PACKAGE = "RGtk2")
 
2634
 
 
2635
  return(w)
 
2636
} 
 
2637
 
 
2638
 
 
2639
cairoShowTextGlyphs <-
 
2640
function(cr, utf8, glyphs, clusters, cluster.flags)
 
2641
{
 
2642
  checkPtrType(cr, "Cairo")
 
2643
  utf8 <- as.character(utf8)
 
2644
  glyphs <- lapply(glyphs, function(x) { x <- as.CairoGlyph(x); x })
 
2645
  clusters <- lapply(clusters, function(x) { x <- as.CairoTextCluster(x); x })
 
2646
  
 
2647
 
 
2648
  w <- .RGtkCall("S_cairo_show_text_glyphs", cr, utf8, glyphs, clusters, cluster.flags, PACKAGE = "RGtk2")
 
2649
 
 
2650
  return(invisible(w))
 
2651
} 
 
2652
 
 
2653
 
 
2654
cairoScaledFontGetScaleMatrix <-
 
2655
function(scaled.font)
 
2656
{
 
2657
  checkPtrType(scaled.font, "CairoScaledFont")
 
2658
 
 
2659
  w <- .RGtkCall("S_cairo_scaled_font_get_scale_matrix", scaled.font, PACKAGE = "RGtk2")
 
2660
 
 
2661
  return(invisible(w))
 
2662
} 
 
2663
 
 
2664
 
 
2665
cairoScaledFontTextToGlyphs <-
 
2666
function(scaled.font, x, y, utf8, utf8.len = -1)
 
2667
{
 
2668
  checkPtrType(scaled.font, "CairoScaledFont")
 
2669
  x <- as.numeric(x)
 
2670
  y <- as.numeric(y)
 
2671
  utf8 <- as.character(utf8)
 
2672
  utf8.len <- as.integer(utf8.len)
 
2673
 
 
2674
  w <- .RGtkCall("S_cairo_scaled_font_text_to_glyphs", scaled.font, x, y, utf8, utf8.len, PACKAGE = "RGtk2")
 
2675
 
 
2676
  return(w)
 
2677
} 
 
2678
 
 
2679
 
 
2680
cairoUserFontFaceCreate <-
 
2681
function()
 
2682
{
 
2683
  
 
2684
 
 
2685
  w <- .RGtkCall("S_cairo_user_font_face_create", PACKAGE = "RGtk2")
 
2686
 
 
2687
  return(w)
 
2688
} 
 
2689
 
 
2690
 
 
2691
cairoUserFontFaceSetInitFunc <-
 
2692
function(font.face, init.func)
 
2693
{
 
2694
  checkPtrType(font.face, "CairoFontFace")
 
2695
  init.func <- as.function(init.func)
 
2696
 
 
2697
  w <- .RGtkCall("S_cairo_user_font_face_set_init_func", font.face, init.func, PACKAGE = "RGtk2")
 
2698
 
 
2699
  return(w)
 
2700
} 
 
2701
 
 
2702
 
 
2703
cairoUserFontFaceSetRenderGlyphFunc <-
 
2704
function(font.face, render.glyph.func)
 
2705
{
 
2706
  checkPtrType(font.face, "CairoFontFace")
 
2707
  render.glyph.func <- as.function(render.glyph.func)
 
2708
 
 
2709
  w <- .RGtkCall("S_cairo_user_font_face_set_render_glyph_func", font.face, render.glyph.func, PACKAGE = "RGtk2")
 
2710
 
 
2711
  return(w)
 
2712
} 
 
2713
 
 
2714
 
 
2715
cairoUserFontFaceSetUnicodeToGlyphFunc <-
 
2716
function(font.face, unicode.to.glyph.func)
 
2717
{
 
2718
  checkPtrType(font.face, "CairoFontFace")
 
2719
  unicode.to.glyph.func <- as.function(unicode.to.glyph.func)
 
2720
 
 
2721
  w <- .RGtkCall("S_cairo_user_font_face_set_unicode_to_glyph_func", font.face, unicode.to.glyph.func, PACKAGE = "RGtk2")
 
2722
 
 
2723
  return(w)
 
2724
} 
 
2725
 
 
2726
 
 
2727
cairoUserFontFaceSetTextToGlyphsFunc <-
 
2728
function(font.face, text.to.glyphs.func)
 
2729
{
 
2730
  checkPtrType(font.face, "CairoFontFace")
 
2731
  text.to.glyphs.func <- as.function(text.to.glyphs.func)
 
2732
 
 
2733
  w <- .RGtkCall("S_cairo_user_font_face_set_text_to_glyphs_func", font.face, text.to.glyphs.func, PACKAGE = "RGtk2")
 
2734
 
 
2735
  return(w)
 
2736
} 
 
2737
 
 
2738
 
 
2739
cairoUserFontFaceGetInitFunc <-
 
2740
function(font.face)
 
2741
{
 
2742
  checkPtrType(font.face, "CairoFontFace")
 
2743
 
 
2744
  w <- .RGtkCall("S_cairo_user_font_face_get_init_func", font.face, PACKAGE = "RGtk2")
 
2745
 
 
2746
  return(w)
 
2747
} 
 
2748
 
 
2749
 
 
2750
cairoUserFontFaceGetRenderGlyphFunc <-
 
2751
function(font.face)
 
2752
{
 
2753
  checkPtrType(font.face, "CairoFontFace")
 
2754
 
 
2755
  w <- .RGtkCall("S_cairo_user_font_face_get_render_glyph_func", font.face, PACKAGE = "RGtk2")
 
2756
 
 
2757
  return(w)
 
2758
} 
 
2759
 
 
2760
 
 
2761
cairoUserFontFaceGetUnicodeToGlyphFunc <-
 
2762
function(font.face)
 
2763
{
 
2764
  checkPtrType(font.face, "CairoFontFace")
 
2765
 
 
2766
  w <- .RGtkCall("S_cairo_user_font_face_get_unicode_to_glyph_func", font.face, PACKAGE = "RGtk2")
 
2767
 
 
2768
  return(w)
 
2769
} 
 
2770
 
 
2771
 
 
2772
cairoUserFontFaceGetTextToGlyphsFunc <-
 
2773
function(font.face)
 
2774
{
 
2775
  checkPtrType(font.face, "CairoFontFace")
 
2776
 
 
2777
  w <- .RGtkCall("S_cairo_user_font_face_get_text_to_glyphs_func", font.face, PACKAGE = "RGtk2")
 
2778
 
 
2779
  return(w)
 
2780
} 
 
2781