OSDN Git Service

use binding.program for override module
[happyabc/happyabc.git] / scm / test / codegen / overrideTest.ml
index 320a153..89edd28 100644 (file)
@@ -5,7 +5,7 @@ open AstUtil
 open OUnit
 
 let ok x y =
-  assert_equal x (Override.of_module y)
+  assert_equal x (Override.of_binding y)
 
 let foo = Node.ghost ([],"Foo")
 let bar = Node.ghost ([],"Bar")