diff options
Diffstat (limited to 'aarch64/Asmgen.v')
-rw-r--r-- | aarch64/Asmgen.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/aarch64/Asmgen.v b/aarch64/Asmgen.v index bd6b55cc..94db0e22 100644 --- a/aarch64/Asmgen.v +++ b/aarch64/Asmgen.v @@ -327,11 +327,11 @@ Definition unfold_bblock (bb: bblock) := * on the other hand could return a position pointing into the original * basic block. *) - (*if zle (list_length_z (header bb)) 1 then*) + if zle (list_length_z (header bb)) 1 then do bo_is <- unfold_body (body bb); - OK (lbl ++ bo_is ++ unfold_exit (exit bb)). - (*else*) - (*Error (msg "Asmgen.unfold_bblock: Multiple labels were generated.").*) + OK (lbl ++ bo_is ++ unfold_exit (exit bb)) + else + Error (msg "Asmgen.unfold_bblock: Multiple labels were generated."). Fixpoint unfold (bbs: Asmblock.bblocks) : res Asm.code := match bbs with |