From 69691b4d727b82953bb62f11615f7bf96f9376d5 Mon Sep 17 00:00:00 2001
From: mzp <mzpppp@gmail.com>
Date: Sun, 13 Sep 2009 19:05:13 +0900
Subject: [PATCH] add type annot for abc module

---
 swflib/abc.ml | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/swflib/abc.ml b/swflib/abc.ml
index 4c361c9..0fd396b 100644
--- a/swflib/abc.ml
+++ b/swflib/abc.ml
@@ -3,5 +3,10 @@ module C = Compile.Make(HighInst)
 include AbcType
 include MethodType
 
-let asm = A.to_bytes
-let compile = C.to_abc
+let asm : LowInst.t abc -> Bytes.t list = A.to_bytes
+let compile : Cpool.multiname list -> HighInst.s method_ -> LowInst.t abc = C.to_abc
+
+let output : out_channel -> Bytes.t list -> unit =
+  Bytes.output_bytes
+
+
-- 
2.11.0