From 86cd1df7badc807c295b62ad76321dd8c2f5775a Mon Sep 17 00:00:00 2001 From: Xavier Leroy Date: Mon, 17 Nov 1997 14:21:05 +0000 Subject: [PATCH] Typo git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1773 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02 --- asmcomp/m68k/selection.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/asmcomp/m68k/selection.ml b/asmcomp/m68k/selection.ml index 42f620ad7..109a777b8 100644 --- a/asmcomp/m68k/selection.ml +++ b/asmcomp/m68k/selection.ml @@ -140,7 +140,7 @@ method select_store addr exp = Cconst_int n -> (Ispecific(Istore_int(n, addr)), Ctuple []) | Cconst_pointer n -> (Ispecific(Istore_int(n, addr)), Ctuple []) | Cconst_symbol s -> (Ispecific(Istore_symbol(s, addr)), Ctuple []) - | _ -> raise Use_default + | _ -> super#select_store addr exp (* Deal with register constraints *)