add async functions and spec to evas

1 files changed, 20 insertions, 0 deletions

diff --git a/spec/evas_spec.rb b/spec/evas_spec.rb
index 815c4a1..c04cd9f 100644
--- a/spec/evas_spec.rb
+++ b/spec/evas_spec.rb
@@ -19,4 +19,24 @@ describe EFL::EVAS do
         EVAS.shutdown.should eql 0
     end
     #
+    it "should have no memory allocation error occured" do
+        EVAS.init
+        EVAS.alloc_error.should eql EVAS::ALLOC_ERROR_NONE
+        EVAS.shutdown
+    end
+    #
+    it "should process async events" do
+        cb = Proc.new do |target,type,evt|
+            target.read_string.should eql "target"
+            type.should eql 0
+            evt.read_string.should eql "work"
+        end
+        EVAS.init
+        target = FFI::MemoryPointer.from_string("target")
+        work = FFI::MemoryPointer.from_string("work")
+        EVAS.async_events_put target, 0, work, cb
+        EVAS.async_events_process.should eql 1
+        EVAS.async_events_process.should eql 0
+        EVAS.shutdown
+    end
 end