From 2a2ec67e6ebeb1dc4aea950487072bc9713a4d31 Mon Sep 17 00:00:00 2001
From: Jeffrey Yasskin <jyasskin@gmail.com>
Date: Sun, 18 Jul 2010 13:37:50 +0800
Subject: Fix opeq.rs for LLVM by implementing simple augmented-assignment
 operators.

---
 src/boot/fe/ast.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/boot/fe')

diff --git a/src/boot/fe/ast.ml b/src/boot/fe/ast.ml
index 1697bf22..b70b2b88 100644
--- a/src/boot/fe/ast.ml
+++ b/src/boot/fe/ast.ml
@@ -1377,6 +1377,7 @@ let ty_children (ty:ty) : ty array =
         [| |]
 ;;
 
+let sprintf_binop = sprintf_fmt fmt_binop;;
 let sprintf_expr = sprintf_fmt fmt_expr;;
 let sprintf_name = sprintf_fmt fmt_name;;
 let sprintf_name_component = sprintf_fmt fmt_name_component;;
-- 
cgit v1.2.3