[seed] examples: Add simple cairo example

[Robert Carr <racarr src gnome org>]

commit f7849cb5dd0c00ee8248ce78771cbe6628a1a07a
Author: Robert Carr <racarr svn gnome org>
Date:   Sat May 16 07:15:41 2009 -0400

    examples: Add simple cairo example
---
 examples/Makefile.am |    2 ++
 examples/cairo.js    |   44 ++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 46 insertions(+), 0 deletions(-)

diff --git a/examples/Makefile.am b/examples/Makefile.am
index 98037a9..a5dbdfe 100644
--- a/examples/Makefile.am
+++ b/examples/Makefile.am
@@ -23,6 +23,7 @@ examples_DATA = \
     async-quine.js \
     calculator.js \
     clutter-0.8.js \
+    cairo.js \
     clutter-0.9.js \
     clutter-cairo.js \
     clutter-cogl-0.8.js \
@@ -55,6 +56,7 @@ endif
 EXTRA_DIST = \
     accelgroup.js \
     actions.js \
+    cairo.js \
     async-quine.js \
     calculator.js \
     clutter-0.8.js \
diff --git a/examples/cairo.js b/examples/cairo.js
new file mode 100755
index 0000000..a12bdd8
--- /dev/null
+++ b/examples/cairo.js
@@ -0,0 +1,44 @@
+#!/usr/local/bin/seed
+
+cairo = imports.cairo;
+Gtk = imports.gi.Gtk;
+
+const dashes = [50.0, 10.0, 10.0, 10.0];
+const offset = -50.0;
+
+function draw_arc(drawing_area){
+    var cr = new cairo.Context.from_drawable(drawing_area.window);
+    
+    cr.scale(2, 2);
+    
+    cr.operator = cairo.Operator.CLEAR;
+    cr.paint();
+    cr.operator = cairo.Operator.OVER;
+    
+    var pat = new cairo.RadialGradient(115.2, 102.4, 25.6, 102.4, 102.4, 128);
+    pat.add_color_stop_rgba (0, 1, 1, 1, 1);
+    pat.add_color_stop_rgba (1, 0, 0, 0, 1);
+    cr.set_source (pat);
+    cr.arc(128, 128, 76.8, 0, 2*Math.PI);
+    cr.fill();
+    
+    return false;
+}
+
+Gtk.init(Seed.argv);
+
+var w = new Gtk.Window();
+var d = new Gtk.DrawingArea();
+w.add(d);
+
+w.resize(500,600);
+
+w.decorated = false;
+
+
+d.signal.expose_event.connect(draw_arc);
+
+w.set_colormap(w.screen.get_rgba_colormap());
+
+w.show_all();
+Gtk.main();