- C2hs - Haskell.org

problem with sys/sysmacros.h
by Jens Petersen 24 Jul '04

24 Jul '04

Hi, I have a problem when processing "vte/vte.h" (from vte-0.11.10) with c2hs-0.12.0 and glibc-2.3.3: LANG=C c2hs --cppopts="-I/usr/include/gtk-2.0 -I/usr/lib/gtk-2.0/include -I/usr/include/atk-1.0 -I/usr/include/pango-1.0 -I/usr/X11R6/include -I/usr/include/freetype2 -I/usr/include/glib-2.0 -I/usr/lib/glib-2.0/include" vte.h Vte.chs c2hs: Generic fatal error. /usr/include/sys/sysmacros.h:43: (column 1) [FATAL] >>> Syntax error! The symbol `{' does not fit here. It seems sys/sysmacros.h changed from glibc-2.3.2. Here is the context: # if defined __GNUC__ && __GNUC__ >= 2 __extension__ extern __inline unsigned int gnu_dev_major (unsigned long long int __dev) __THROW { return ((__dev >> 8) & 0xfff) | ((unsigned int) (__dev >> 32) & ~0xfff); } Jens ps glibc-2.3.3 will be in Fedora Core 2, which is being released on Tuesday. pps I just uploaded c2hs-0.12.0 rpms built with glibc-2.3.3 to <http://haskell.org/~petersen/rpms/c2hs/>. I applied the following patch to build it with ghc-6.2.1: --- c2hs-0.12.0/c2hs/c/CAttrs.hs~ 2004-05-16 09:46:07.000000000 +0900 +++ c2hs-0.12.0/c2hs/c/CAttrs.hs 2004-05-16 09:46:07.000000000 +0900 @@ -144,7 +144,7 @@ -- leaveObjRangeC :: AttrC -> AttrC leaveObjRangeC ac = ac { - defObjsAC = fst . leaveRange . defObjsAC $ ac, + defObjsAC = fst . leaveRange . defObjsAC $ ac } -- add another definitions to the object name space (EXPORTED)

3 2

hierarchical modules
by Duncan Coutts 23 Jul '04

23 Jul '04

All, So far as I know c2hs doesn't support hierarchical modules well. I've not tried the latest version, so apologies if this has already been addressed. Under the Hierarchical Module Namespace Extension http://www.haskell.org/hierarchical-modules/ module names can have dots '.' in them and when mapping these to filenames they are converted to directory separators. Foo.Bar.Baz -> Foo/Bar/Bas(.hs|.chi|etc) I've knocked up a patch that I think solves the problem (works for me), but an expert eye would be appreciated. I've made a change in two places: * CHSLexer.hs: identOrKW function, added '.' as an allowable character in an identifier within binding hooks. * CHS.hs: parseImport function, inserted a call to a new function moduleNameToFileName before calling loadCHI. The new function does the module name to file path conversion. Here's a patch (it's against the gtk2hs fork of c2hs but it's quite small so the idea should be clear) diff -U2 -r1.2 CHSLexer.hs --- CHSLexer.hs 1 Oct 2002 15:17:07 -0000 1.2 +++ CHSLexer.hs 16 Jul 2004 18:52:26 -0000 @@ -557,5 +557,5 @@ -- identOrKW = - letter +> (letter >|< digit >|< char '\'')`star` epsilon + letter +> (letter >|< digit >|< char '\'' >|< char '.')`star` epsilon `lexactionName` \cs pos name -> (idkwtok $!pos) cs name where diff -U2 -r1.4 CHS.hs --- CHS.hs 20 May 2004 16:42:17 -0000 1.4 +++ CHS.hs 16 Jul 2004 18:52:26 -0000 @@ -747,9 +747,14 @@ CHSTokQualif _: CHSTokIdent _ ide:toks -> return (True , ide, toks) _ -> syntaxError toks - chi <- loadCHI . identToLexeme $ modid + chi <- loadCHI . moduleNameToFileName . identToLexeme $ modid toks'' <- parseEndHook toks' frags <- parseFrags toks'' return $ CHSHook (CHSImport qual modid chi pos) : frags +moduleNameToFileName :: String -> FilePath +moduleNameToFileName = map dotToSlash + where dotToSlash '.' = '/' + dotToSlash c = c + parseContext :: Position -> [CHSToken] -> CST s [CHSFrag] parseContext pos toks = do Does this seem ok? It makes me a bit nervous changing the lexical definition of an identifier (we really only want to change the module identifier definition, not all identifiers). Duncan

1 2

Email marketing
by qesd＠hotmail.com 11 Jul '04

11 Jul '04

1 0

ANN: C->Haskell 0.13.1 "Pressing Forward"
by Manuel M T Chakravarty 27 Jun '04

27 Jun '04

On the C->Haskell web site http://www.cse.unsw.edu.au/~chak/haskell/c2hs/ you can now find source release 0.13.1. It features the following: * The issue with 'sys/sysmacros.h' in new version of glibc that Jens Petersen reported is fixed. * The space leak identified by Duncan Couts has been fixed. * The generated code conforms to the H98 Addendum 1.0 (also in its treatment of `ForeignPtr's). Manuel

2 1

[C2hs] Have a nice day! //liable to all the curses and maledictions of the law; so that
by Warmest J. Wine 17 May '04

17 May '04

Get easy money! http://members.lycos.co.uk/lancer131/1/ --- advantage over us; many others there are, no doubt, which

1 0

Profiling c2hs
by Duncan Coutts 15 May '04

15 May '04

All, I was writing a demo app to add to gtk2hs's small collection; it's a viewer for ghc's time profile log files, and I needed a large profile file to test it on so I thought I'd try profiling c2hs. Here's what I found: Looking at allocations (which corresponds quite closely with time): Note that these are % of the total cost, not % of their parent cost 11.7% is taken by the C & chs lexers which is not unreasonable. 77.4% is taken by the CParser Within the CParser: 72.0% is taken by parseCExtDeclList, within which 65.5% is taken by morphTypeNames (and 58.2% of the runtime) 31.4% alloc & 26.5% time was taken just by calls to Prelude.elem within morphTypeNames. In this particular run of c2hs, in which it was processing some large gtk+ headers, it called morphTypeNames over 55 million times. I narrowed this down a bit more and found that it is the call to morphTypeNames from parseCExtDeclList that takes the time, the call from parseCHeader is insignificant. Furthermore, it is the recursive calls to morphTypeNames that is expensive; parseCExtDeclList only called morphTypeNames about 1000 times (compared to 55 million recursive calls). So what's going and and what can we do? If I understand the code correctly, the reason we are doing this morphTypeNames is because we can't distinguish typedef'ed identifiers in the parser, we need to remember which identifiers were typedefs and then treat them differently in the parser later if they were. At the moment this is done by after parsing each declaration (which might contain typedefs) modifying the remaining stream of tokens changing all identifiers that have been discovered to be typedefs from ordinary identifier tokens to typedef-identifier tokens. This is expensive. Perhaps it would be possible to add this set of typedef identifiers to the parser state monad and thread it through to the parsers for cid and typedefName which could consult this parser state and match conditionally on the identifier token being in the typedef-identifier set or not. (cidOrTN would not need to to a lookup) This would avoid traversing the token stream after parsing each declaration. Sound reasonable? Duncan

3 5

I NEED YOUR ASSISTANCE
by telma savimbi 09 May '04

09 May '04

FIRST PROPERTIES INVESTMENT LTD (A SUBSIDIARY OF SAVIMBI INVESTMENTS LTD) ATTENTI: DIRECTOR/PRESIDENT May I use this opportunity to introduce my self as DR.(MRS). TELMA SAVIMBI I am the wife to the late MR. GREAT JONAS SAVIMBI, the leader of the Angolan revolutionary group known as the (UNITA) who died while on active duty in an effort to liberate our people. I am contacting you with the believe that we will develop a cordial business relationship which will be beneficial to both parties. I am currently in possession of (Fourty Five Million United State Dollars) which I intended to use for investment purposes specifically in your country. The money came about as a result of my late husband's inability to proceed with the purchase of military hardware, which he contracted with South African Arms Company. Since the start of our civil war the source of funds in prosecuting the war has been from diamond, which is under our control. My son is the secretary of state mining under The diamond were always exported to South Africa and art of the proceeds usually used buying military hardware's, I traveled immediately to my late husband's residence in South Africa and discovered the sum of ($45 Million Dollars) cash hidden under his underground safe. Due to my status as a refugee, I cannot invest these funds here in South Africa, I therefore seek your assistance in transferring this funds out of South Africa, all necessary arrangement has been made by me and I assure you that there is no risk attached to this and we will work out modalities for the success of this transaction. I promise to give you 10% of the total funds for your assistance and my family will use the remaining 90% for investment in your country. I hope that this proposal will interest you. my son JAMES JONAS SAVIMBI is staying in Spain as a refugee Please I will like you to keep this transaction at utmost secrecy whatever your decision will be while I await your response via email telmasavimbi(a)uymail.com (this is savimbi web site) http://www.empereur.com/angola.html Regards, DR.(MRS).TELMA SAVIMBI

1 0

Premier Asian Clothing e-Shopping!
by Fashion Orient Inc. 04 May '04

04 May '04

This email is frome Priemer Asian Clothing e-Shop Fashion Orient! http://www.fashionorient.com Free gift for every order over $80 !!! We are specialized in Chinese clothing, Chinese Dress, Oriental Clothing, and more... FashionOrient Inc. www.fashionorient.com

1 0

AWAIT YOUR RESPONSE
by Dr. SANTOS IKECHUKWU 29 Apr '04

29 Apr '04

FROM: Dr. SANTOS IKECHUKWU, AUDITING AND ACCOUNTING UNIT ECO BANK PLC OF NIGERIA. Atten: I am Dr. Santos Ikechukwu, the director in charge of auditing and accounting section of ECO BANK PLC LAGOS NIGERIA BRANCH. With due respect and regard, I have decided to contact you on a business transaction that will be very beneficial to both of us. During our investigation and auditing in this bank, my department came across a very huge sum of money belonging to a deceased person who died on October 31st 1997 in a auto crash and the fund has been dormant in his account with this Bank since 1996 without any claim of the fund in our custody either from his family or relation. A close investigation revealed that the deceased has no existing relation as next of kin. The said amount is U.S $12.5 million, I want you to collaborate with me to put a claim on this money as the next of kin of the deceased account holder,Mr Duckson Fritz.I and my colleague will present you as the next of kin. Meanwhile all arrangement to put claim over this fund as the bonafide next of kin to the deceased, get the required approval and transfer this money to your designated foreign bank account has been put in place and directives and needed information will be relayed to you as soon as you indicate your interest and willingness to assist us in this risk free and highly confidential transaction. On your reply, we shall discuss the sharing ratio for each party to this transaction. Please feel free to contact me immediately via email for further directive and clarification on this transaction. I look forward to a mutual beneficial business relationship with you. Best wishes, Dr. Santos Ikechukwu.

1 0

"(±¤°í)¿Â¶óÀÎ°ñÇÁ ÇÔ ÇØº¸½Ã°í-Å« »ç¾÷±¸»óÇÏ½Ê½Ã¿À@""
by ų��ڷ� 21 Apr '04

21 Apr '04

1 0