From 06fb783c80b38fbbb170707c9af2238c547a601a Mon Sep 17 00:00:00 2001 From: Dmitry Boulytchev Date: Mon, 5 Mar 2018 01:01:36 +0300 Subject: [PATCH] Fixed typos in comments --- src/X86.ml | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/X86.ml b/src/X86.ml index ab4b842c5..1ee1305f4 100644 --- a/src/X86.ml +++ b/src/X86.ml @@ -228,7 +228,7 @@ class env = method globals = S.elements globals end -(* compiles a unit: generates machine code for the stack program and surrounds it +(* compiles a unit: generates x86 machine code for the stack program and surrounds it with function prologue/epilogue *) let compile_unit env scode = @@ -239,8 +239,8 @@ let compile_unit env scode = [Mov (ebp, esp); Pop ebp; Binop ("^", eax, eax); Ret] ) -(* Generates an assembler text for a program: first compile the program into - the stack code, then generate x86 assember code, then print the assembler file +(* Generates an assembler text for a program: first compiles the program into + the stack code, then generates x86 assember code, then prints the assembler file *) let genasm prog = let env, code = compile_unit (new env) (SM.compile prog) in