cvs commit: fptools/ghc/compiler/absCSyn AbsCUtils.lhs PprAbsC.lhsfptools/ghc/compiler/coreSyn CoreUnfold.lhs fptools/ghc/compiler/deSugarDsCCall.lhs DsForeign.lhs fptools/ghc/compiler/hsSyn HsDecls.lhsfptools/ghc/compiler/main MkIface.lhs fptools/ghc

Simon Peyton-Jones simonpj@microsoft.com
Fri, 25 May 2001 09:57:18 -0700


Aha, that's true.  I discovered that the +ACI-assembly+ACI- or +ACI-package+ACI- part
of the foreign import was never being used, so i dropped it.

(We have a New Plan for this in the revised FFI, of course.)

I suppose we could continue to parse and discard it, but it seems
more honest to reject it.

Sigbjorn, what do you think?

Simon

+AHw- -----Original Message-----
+AHw- From: Sven Panne +AFs-mailto:Sven.Panne+AEA-informatik.uni-muenchen.de+AF0- 
+AHw- Sent: 25 May 2001 13:44
+AHw- To: cvs-ghc+AEA-haskell.org
+AHw- Subject: Re: cvs commit: fptools/ghc/compiler/absCSyn 
+AHw- AbsCUtils.lhs PprAbsC.lhsfptools/ghc/compiler/coreSyn 
+AHw- CoreUnfold.lhs fptools/ghc/compiler/deSugarDsCCall.lhs 
+AHw- DsForeign.lhs fptools/ghc/compiler/hsSyn 
+AHw- HsDecls.lhsfptools/ghc/compiler/main MkIface.lhs fptools/ghc
+AHw- 
+AHw- 
+AHw- Simon Peyton Jones wrote:
+AHw- +AD4- +AFs-...+AF0-
+AHw- +AD4-         ------------------------------------------------------
+AHw- +AD4-         More stuff towards generalising 'foreign' declarations
+AHw- +AD4-         ------------------------------------------------------
+AHw- +AD4- +AFs-...+AF0-
+AHw- 
+AHw- Just a note about this commit: It has silently changed 
+AHw- 'ext+AF8-fun' into 'ext+AF8-name' in f.i., so the example from the FFI docs
+AHw- 
+AHw-    foreign import stdcall +ACI-Advapi32+ACI- +ACI-RegCloseKey+ACI- 
+AHw- regCloseKey :: Addr -+AD4- IO ()
+AHw- 
+AHw- yields a syntax error now. I'm not sure if we should keep 
+AHw- backwards compatibility here, does any Haskell system out 
+AHw- there really +ACo-use+ACo- the 'ext+AF8-loc' part? Anyway, HDirect 
+AHw- generates stuff like this IIRC, so this won't make Sigbjorn 
+AHw- particularly happy, I guess...  :-)
+AHw- 
+AHw- Cheers,
+AHw-    Sven
+AHw- 
+AHw- +AF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXwBfAF8AXw-
+AHw- Cvs-ghc mailing list
+AHw- Cvs-ghc+AEA-haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
+AHw- 
+AHw-