From ce25c4afa4c9ddd5b71b67795cc1ffaf3ac1578f Mon Sep 17 00:00:00 2001 From: simonmar Date: Mon, 17 Feb 2003 11:42:15 +0000 Subject: [PATCH] [project @ 2003-02-17 11:42:15 by simonmar] Comment change only --- ghc/compiler/ghci/ByteCodeGen.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/ghci/ByteCodeGen.lhs b/ghc/compiler/ghci/ByteCodeGen.lhs index b8cbb37..d8bb406 100644 --- a/ghc/compiler/ghci/ByteCodeGen.lhs +++ b/ghc/compiler/ghci/ByteCodeGen.lhs @@ -788,8 +788,8 @@ doCase d s p (_,scrut) -- Deal with a CCall. -- Taggedly push the args onto the stack R->L, --- deferencing ForeignObj#s and (ToDo: adjusting addrs to point to --- payloads in Ptr/Byte arrays). Then, generate the marshalling +-- deferencing ForeignObj#s and adjusting addrs to point to +-- payloads in Ptr/Byte arrays. Then, generate the marshalling -- (machine) code for the ccall, and create bytecodes to call that and -- then return in the right way. -- 1.7.10.4