June 2002 - Hugs-Users

hugs ffi - question thats been bugging me for some time
by R. Legere 31 Dec '02

31 Dec '02

In docs/ffi-notes.txt, I find the following: ------------------------------------------------------------ o foreign export static is not implemented. You can code around this by writing: foreign import dynamic foo_dynamic :: Addr -> (A -> B -> C) foreign label foo_addr :: Addr foo = foo_dynamic foo_addr instead of: foreign import foo :: A -> B -> C ------------------------------------------------------------------------- Does anyone understand what this is saying? I can't grok it. The work around presented here seems to have nothing to do with foriegn export static. It looks like a workaround to not having foreign IMPORT static. (Which we of course dont need a workaround for :)). Is something extremely tricky going on or am i just dense? Anyway, just curious, I have not had any trouble working around by passing pointers to the C-side using foreign export dynamic. I have just wondered about this for a long long time :)

3 6

Crazy Lockup Issue
by Irfon-Kim Ahmad 26 Jul '02

26 Jul '02

I want to write a simple hugs program to help me parse some data. I've got one declaration so far, which just sets up the data set. However, if I try to just load this into Hugs, it gets as far as "compiling" and then locks up my computer solid. I have to power it off and on. I'm using the December 2001 Hugs binaries for MacOS9, from the website. My only element in the parameters file is, "-h 2500000". I increased this from the default, "-h 500000" in an attempt to address this problem, although the amount of data is very small, but it locks up with either setting. Huge is currently allocated 32MB of RAM in finder, also increased from the default quite a bit, and it locks up either way. Any ideas? The definition is as follows (sorry for the length, but it's just one 'line' and it's the one that seems to be causing the problem. (Also, sorry about the formatting, the lines are over 80char, so it may look a little messy on your end.) myset = [1,0,0,1,1,1,1,1,0,0,0,0,1,1,0,1,1,0,0,1,0,0,1,0,0,1,0,1,0,0,1,0,0,0,1,1,1,0 ,0,0,1,1,1,1,1,1,1,1,0,0,0,1,1,0,0,0,1,0,0,1] ++ [1,1,1,1,0,0,0,0,1,0,0,0,0,1,1,0,0,1,1,1,0,0,1,1,0,0,0,1,0,1,0,0,0,0,1,0,0,1 ,1,1,1,1,0,1,0,1,1,0,0,0,1,0,1,0,1,0,0,0,0,0] ++ [1,0,0,0,1,1,0,0,1,1,1,1,0,0,0,0,0,1,0,1,0,0,0,0,0,0,0,1,1,1,0,1,0,1,1,1,1,1 ,0,1,1,0,0,1,1,0,0,1,0,1,0,0,0,1,1,1,1,1,1,0] ++ [0,0,1,0,1,1,1,1,0,0,0,0,0,0,1,1,0,1,1,1,1,1,1,0,0,0,1,0,1,1,0,1,1,0,0,1,0,1 ,1,1,1,1,0,1,0,1,0,1,1,0,0,1,0,1,1,1,0,1,1,1] ++ [1,0,0,0,1,1,1,1,1,0,0,0,1,0,1,1,1,0,0,1,0,1,1,1,0,1,1,1,0,1,0,1,0,0,0,0,1,0 ,1,0,1,0,0,0,0,1,0,0,0,0,1,1,1,1,0,0,0,1,1,0] ++ [1,0,0,1,1,0,0,1,0,1,0,0,1,1,1,0,1,0,1,0,1,1,1,0,0,1,0,1,1,0,0,1,0,0,1,0,0,1 ,0,1,0,1,1,0,0,1,1,0,0,0,1,1,0,0,0,0,0,0,1,1] ++ [1,0,0,0,0,1,1,1,1,0,0,0,1,0,0,0,0,0,0,1,0,0,1,0,1,1,1,0,0,1,0,1,1,1,1,1,0,1 ,1,0,0,0,1,0,1,1,0,1,1,0,0,0,1,0,0,0,1,1,1,1] ++ [0,0,0,0,1,0,1,0,1,0,0,0,0,0,1,1,1,0,1,1,1,0,0,0,0,0,0,0,1,1,0,0,1,0,1,0,0,0 ,1,0,1,0,1,1,0,0,0,0,0,0,1,1,1,1,1,0,0,1,0,0] ++ [0,0,0,1,0,1,1,1,0,0,1,0,1,1,1,1,1,0,0,0,0,0,1,0,1,0,0,1,0,1,0,1,0,0,1,0,1,1 ,0,0,0,1,0,0,0,0,0,0,1,1,1,1,1,1,0,1,1,0,1,1] ++ [0,0,0,1,1,1,0,1,1,1,1,1,1,1,0,1,0,1,0,0,0,0,1,0,0,1,0,0,1,0,1,0,1,1,0,0,0,1 ,1,0,0,0,1,1,1,1,1,0,0,1,0,1,1,0,0,0,0,0,0,1] ++ [1,0,0,0,0,1,0,1,1,0,0,0,0,0,0,1,1,0,0,1,1,1,1,0,1,0,0,0,0,1,1,0,0,1,0,1,1,1 ,0,0,1,0,0,0,1,1,0,1,1,1,0,1,1,0,0,1,1,1,0,0] ++ [0,1,1,1,1,0,1,1,0,1,0,0,0,0,1,1,0,1,0,1,1,0,1,1,1,0,0,0,1,1,0,1,1,0,1,1,1,1 ,0,0,1,0,0,0,0,0,0,0,1,1,1,0,0,1,0,1,0,1,0,1] ++ [0,1,1,1,0,1,0,1,0,1,1,1,1,0,0,1,0,1,1,1,1,0,1,1,1,1,0,1,0,0,0,0,0,0,0,1,0,1 ,0,1,0,1,1,1,1,0,0,0,1,1,0,0,0,0,0,0,1,1,1,1] ++ [0,1,0,0,1,1,1,1,1,1,0,1,1,1,0,0,1,1,0,0,1,1,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0 ,1,0,1,1,0,1,1,0,1,0,1,1,1,1,1,1,1,0,0,0,1,0] ++ [0,0,0,1,1,0,0,1,0,1,1,0,0,0,0,0,1,0,1,0,1,0,1,0,1,1,0,0,1,0,0,1,0,0,0,0,1,1 ,1,0,1,0,1,1,1,0,0,0,0,1,0,1,1,0,0,1,0,1,1,1] ++ [0,1,0,0,1,1,0,1,1,1,1,0,1,1,1,1,0,1,0,1,0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,1,1,0 ,0,0,1,1,1,1,0,1,1,0,1,0,1,1,1,0,1,1,1,1,0,0] ++ [0,1,1,0,0,0,0,0,1,1,1,0,1,0,0,0,1,0,1,0,0,0,1,0,0,0,0,1,1,1,0,1,1,1,0,1,1,0 ,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,1] ++ [0,0,0,1,1,1,1,0,1,0,1,0,0,0,1,1,0,1,0,0,0,1,0,1,1,1,0,1,1,0,1,0,1,0,0,0,1,0 ,1,0,0,0,0,1,0,1,0,0,1,0,0,1,0,0,0,1,0,1,0,1] ++ [1,1,0,0,1,0,0,1,0,1,1,0,1,0,1,1,0,0,1,0,1,1,1,1,1,0,1,0,0,1,1,0,1,0,1,0,1,1 ,1,1,0,1,0,1,0,1,1,1,1,1,1,0,1,1,0,1,1,0,1,0] ++ [1,1,0,1,0,1,0,1,1,1,1,1,0,0,1,1,0,1,1,1,0,1,0,1,1,1,1,1,0,1,1,1,1,0,0,1,1,0 ,1,1,1,0,1,0,1,1,1,0,1,0,0,0,0,1,1,0,1,1,1,1] ++ [1,1,1,1,1,0,1,1,0,0,1,1,0,0,0,1,0,0,0,1,1,0,0,0,1,0,0,1,0,0,0,1,1,0,1,0,1,0 ,1,0,0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,0,1,1,0,1] ++ [0,1,0,0,0,0,1,0,1,1,1,0,1,0,0,0,0,1,1,1,0,0,1,1,1,0,0,0,1,0,1,1,1,1,0,0,1,0 ,0,0,1,1,0,0,1,1,0,0,0,0,1,1,1,0,1,1,1,1,0,1] ++ [0,1,1,1,0,0,1,0,0,0,1,0,1,1,1,1,0,1,0,1,0,1,1,1,0,0,1,1,0,1,0,0,1,0,0,0,1,1 ,1,1,1,0,0,0,1,0,0,0,1,1,0,0,0,1,1,1,1,1,0,0] ++ [1,1,1,0,0,0,1,0,1,0,0,1,0,0,1,0,1,0,0,1,1,1,0,1,0,1,1,1,0,1,0,1,0,0,1,0,0,0 ,0,0,1,1,1,0,1,0,0,0,1,0,0,1,1,0,1,0,1,1,0,1] ++ [1,0,0,0,1,0,1,0,0,1,1,0,0,1,1,0,1,0,1,1,1,0,1,1,1,1,1,0,1,0,0,0,0,1,1,0,0,0 ,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,1,1,0] ++ [1,1,0,1,1,1,0,0,0,1,0,0,0,0,0,1,0,0,1,1,0,1,0,1,1,0,0,0,0,0,0,0,1,0,1,1,0,0 ,0,0,1,0,1,0,0,0,0,1,1,0,0,1,1,1,0,1,1,0,1,0] ++ [1,0,1,0,1,1,1,0,1,0,0,0,1,1,0,1,1,0,1,1,1,1,1,0,0,1,1,0,0,1,0,0,1,0,0,0,0,0 ,0,1,1,1,1,1,0,1,0,0,1,0,0,1,1,1,1,1,0,0,1,1] ++ [1,1,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0,0,0,1,1,1,1,1,0,0,1,1,0,1,0,1 ,0,1,0,1,1,0,1,1,1,0,1,0,0,0,1,0,1,0,0,0,1,1] ++ [0,0,0,0,1,0,1,0,0,0,1,0,0,0,0,1,1,0,1,0,0,0,1,0,1,1,1,1,1,0,1,1,0,0,1,0,1,0 ,1,1,1,0,1,0,1,1,1,1,1,0,1,0,1,1,0,0,1,0,0,0] ++ [1,0,0,0,1,0,1,0,0,1,0,1,1,1,1,0,0,0,1,0,1,1,1,0,0,0,1,1,0,1,1,0,1,1,1,0,0,1 ,1,1,0,0,1,0,0,0,0,0,0,0,1,0,0,1,1,1,1,1,1,1] ++ [1,1,0,1,1,1,0,0,0,1,1,1,0,1,1,0,1,0,1,1,0,1,1,1,0,0,0,0,1,1,1,0,1,1,0,1,1,1 ,0,1,0,0,0,1,0,1,0,0,0,0,1,0,0,0,1,0,0,1,0,0] ++ [0,0,1,0,1,0,1,1,1,0,1,0,1,0,0,0,0,1,0,1,0,1,1,1,0,0,0,0,1,0,0,1,0,1,0,1,0,1 ,0,0,1,1,1,1,0,0,0,0,1,0,0,1,1,1,0,1,0,1,1,1] ++ [1,1,1,0,0,1,1,0,1,0,0,0,0,0,1,0,1,1,0,0,0,1,1,1,1,0,0,1,0,0,1,1,0,0,1,1,0,0 ,0,0,0,0,0,1,1,1,0,0,0,0,0,0,1,0,1,0,0,0,1,1] ++ [0,0,0,0,1,0,0,0,0,0,0,0,1,0,1,0,1,1,0,1,0,0,1,1,0,0,0,0,1,1,1,0,1,1,1,1,1,0 ,0,0,1,0,1,1,0,0,1,1,0,0,1,0,1,0,0,1,0,0,1,0] ++ [0,0,1,1,0,1,1,0,0,0,0,1,0,1,1,0,0,0,1,0,0,1,1,1,0,1,0,1,0,0,0,1,0,0,0,1,0,0 ,1,1,1,1,1,0,1,1,1,1,1,0,1,1,0,1,1,1,0,1,1,0] ++ [1,1,1,0,1,0,0,1,0,0,1,1,0,0,1,0,1,1,1,1,1,1,1,0,0,1,1,1,0,1,0,0,1,1,0,0,0,0 ,1,1,0,0,0,0,1,1,1,1,0,1,0,1,1,1,0,1,1,1,1,1] ++ [1,0,0,0,0,1,0,0,1,0,0,1,1,1,1,1,1,1,1,1,0,0,1,0,1,1,1,1,0,1,1,1,0,0,1,0,0,1 ,1,0,0,0,0,0,1,0,0,0,1,1,1,0,1,1,0,1,0,0,1,0] ++ [0,0,0,0,1,1,1,1,0,0,0,1,1,1,0,1,0,1,1,0,1,1,0,0,0,1,1,0,1,0,0,1,1,1,1,0,0,1 ,0,1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,1,0,0,1,0,1] ++ [0,0,1,0,0,0,1,0,1,0,0,1,0,0,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,1,0,1,0,0,0,1 ,1,1,1,0,1,1,1,0,1,0,1,0,1,0,0,1,0,1,0,0,0,0] ++ [1,0,0,1,0,0,0,1,1,0,1,0,1,0,1,1,1,0,0,1,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1 ,1,0,1,0,0,1,1,1,0,1,0,1,0,0,1,1,1,0,1,1,1,0] ++ [1,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,1,1,1,0,0,0,1,1,0,1,0,1,1,0,0,0,1,1,1,0,1,1 ,1,1,1,0,1,0,1,1,1,0,0,1,0,0,1,1,0,1,0,0,0,1] ++ [0,0,1,1,1,0,1,1,1,1,1,1,0,1,1,0,1,0,0,0,1,1,0,1,0,1,0,0,1,0,0,1,0,0,1,0,1,1 ,1,1,0,0,0,0,1,0,1,1,1,0,1,0,0,1,1,1,1,0,1,1] ++ [0,1,1,1,0,1,0,0,0,1,1,1,0,0,1,0,0,0,1,1,1,0,0,1,0,0,0,1,1,0,0,0,0,0,0,1,1,0 ,1,0,0,0,0,0,1,1,0,1,1,0,0,0,0,1,0,1,1,0,1,1] ++ [0,1,0,0,1,0,1,1,0,1,1,1,1,0,0,0,1,1,1,1,0,0,0,0,1,1,0,0,0,0,1,0,1,1,0,0,0,0 ,0,1,0,1,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,1,1,1] ++ [0,1,1,0,0,1,0,1,1,0,1,1,1,0,0,0,0,1,0,0,0,1,1,1,1,1,0,1,0,1,1,0,0,1,0,1,1,0 ,0,0,0,1,1,1,1,1,0,0,1,1,0,0,1,0,0,0,1,0,0,1] ++ [0,0,0,0,0,0,0,0,0,1,0,1,0,1,0,1,1,1,1,1,0,1,1,0,1,1,0,0,1,0,1,0,0,0,1,1,1,1 ,0,1,0,1,0,1,0,1,0,1,1,1,0,1,1,0,1,0,1,0,1,1] ++ [0,0,0,1,1,1,0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,1,1,1,1,0,0 ,0,1,0,0,0,0,1,1,1,0,0,1,1,1,1,0,0,1,1,0,1,0] ++ [1,0,1,0,0,1,1,0,0,0,1,0,1,0,1,1,0,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,1,1,1,0 ,1,0,0,0,0,0,1,1,1,0,1,0,0,0,1,0,1,0,1,1,0,0] ++ [0,1,0,0,0,0,1,1,0,1,1,1,0,0,1,0,1,1,0,1,1,0,1,1,0,1,1,1,0,0,1,0,0,1,1,1,1,1 ,0,1,1,0,1,1,0,1,1,0,0,0,0,1,0,0,1,1,0,1,1,0] ++ [1,1,0,0,0,0,0,0,0,1,0,1,1,1,0,0,1,1,1,0,0,1,1,0,0,0,1,0,1,0,0,1,0,1,1,1,0,1 ,1,1,1,1,1,0,0,1,1,0,1,0,1,1,0,1,1,0,1,1,1,1] ++ [0,0,0,1,1,1,1,0,1,1,0,1,1,0,1,0,0,0,0,0,0,1,0,1,1,1,0,0,1,0,0,0,0,1,1,1,0,1 ,1,0,1,1,1,0,0,1,1,1,0,0,1,0,1,1,0,1,1,1,0,1] ++ [0,0,0,1,1,1,0,1,1,1,0,0,0,1,0,1,1,0,1,0,1,1,0,0,0,0,0,0,1,0,1,1,1,1,0,0,1,1 ,0,0,1,0,0,1,0,0,1,0,0,1,0,0,0,1,1,0,1,0,0,0] ++ [1,1,0,0,0,1,0,0,1,1,0,1,1,1,0,1,1,0,1,1,0,0,0,1,0,1,0,1,0,1,0,1,0,0,0,0,0,1 ,1,1,1,1,0,1,1,1,1,1,1,1,0,1,0,1,0,0,1,0,0,0] ++ [1,0,1,0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,0,0,1,1,0,0,1,0,0,1,1,0,1,0,0,0,1,1,0,0 ,1,0,1,1,1,0,1,0,0,0,0,1,1,1,1,0,0,0,1,1,0,1] ++ [0,1,0,0,0,0,1,0,1,1,1,0,0,0,1,1,0,0,1,1,1,0,1,1,1,0,0,1,1,0,0,1,1,1,1,0,1,0 ,0,1,1,0,1,0,1,0,1,1,1,0,0,1,0,0,1,1,0,1,1,0] ++ [1,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,0,1,1,0,0,0,0,1,1,1,1,1,1,1,0,0,0,0,1,1 ,0,1,0,0,1,1,1,0,1,0,1,0,1,1,0,1,1,1,1,1,0,1] ++ [0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,1,1,0,1,1,0,0,0,1,0,0,0,0,0,0,1,0 ,0,1,0,0,1,0,0,1,1,0,1,0,0,0,0,1,0,0,1,1,0,0] ++ [1,0,0,0,0,0,0,1,0,1,1,1,1,1,1,1,0,0,1,1,1,0,0,1,0,1,0,0,0,1,0,0,0,0,1,1,1,0 ,0,1,1,0,0,1,0,1,1,1,1,0,1,1,0,1,0,1,1,1,1,1]

2 1

Fw: goldfish
by jovilmar 28 Jun '02

28 Jun '02

1 0

Undelivered Mail Returned to Sender -goldfish
by Mail Delivery System 28 Jun '02

28 Jun '02

1 0

Fw: goldfish
by jovilmar 28 Jun '02

28 Jun '02

1 0

Undelivered Mail Returned to Sender -goldfish
by Mail Delivery System 28 Jun '02

28 Jun '02

1 0

I NEED YOUR ASSISTANCE
by DEMOLA RASAQ 20 Jun '02

20 Jun '02

ATTN:THE C.E.O I am Mrs Mariam Abacha,widow of the late General Sani Abacha former Nigerian Military head of state who died as a result of cardiac arrest. Chief Obasi Ngwuta who happens to be my managing director introduced your company to me.I am interested in establishing a long lasting business relationship with you. I have the sum of fifty million U.S dollars which was secretly defaced and sealed in four big metal boxes for security reasons.I personally therefore appeal to you for your urgent assistance to move this money into your account where I believe it will be safe since I cannot leave the country due to restriction of movement imposed on me and members of my family by the Nigerian government. That is why I am contacting you to help me and my family overcome this ordeal,my phone lines have been bugged and this explains why I am using Chief Obasi Ngwuta as my front. However,arrangements have been put in place to move this money to any of the Affiliates(Clearing and Payment Center) of the security company in Ghana,Spain,Canada,Holland and London through a Diplomatic security company.As soon as you indicate your interest,my lawyer shall arrange for a face to face meeting outside Nigeria with you.He would also provide you with his direct telephone&fax numbers and e-mail. Conclusively,I have decided to offer you 15%of the total sum for your assistance,while 5% will be for whatever expenses that will be incurred while 80% is to be used in buying shares and franchise from your company if you agree, and maybe buying houses in your country subsequent to our free movement by the Nigerian Government. Please contact me immediately through my e-mail addresses:maryam101@onewebsite.com or mabacha20(a)lycos.com Treat with absolute confidentiality and sincerity. Yours Sincerely Hajia Maryam Abacha

1 0

ASSISTANCE NEEDED
by WILLIAMS KOJO 20 Jun '02

20 Jun '02

WILLIAMS KOJO. AUDITING AND ACCOUNTING UNIT. FOREIGN REMITTANCE DEPT. ECO BANK,LOME- TOGO. Dear Sir, I am WILLIAMS KOJO, the director in charge of auditing and accounting section of Eco Banque Lome,Republic of Togo with due respect and regard. I have decided to contact you on a business transaction that will be very beneficial to both of us at the end of the transaction. 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 november 1997 in a plane crash and the fund has been dormant in his account with this Bank without any claim of the fund in our custody either from his family or relation before our discovery to this development. Although personally,I keep this information secret within myself and partners to enable the whole plans and idea be profitable and successful. During the time of execution. The said amount was us$10M(Ten million united states dollarS Meanwhile all the whole 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 a foreign 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 and also benefit your self to this great business opportunity. In fact I could have done this deal alone but because of my position in this country as a civil servant,we are not allowed to operate a foreign account and would eventually raise an eye brow on my side during the time of transfer because I work in this bank. This is the actual reason why it will require a second party or fellow who will forward claims as the next of kin with affidavit of trust of oath to the Bank and also present a foreign account where he will need the money to be re-transferred into on his request as it may be after due verification and clarification by the correspondent branch of the bank,where the whole money will be remitted from to your own designation bank account. I will not fail to inform you that this transaction is 100% risk free. On smooth conclusion of this transaction, you will be entitled to 30% of the total sum as gratification, while 70% will be for me and my partners. Please,you have been adviced to keep top secret as we are still in service and intend to retire from service after we conclude this deal with you. I will be monitoring the whole situation here in this bank until you confirm the money in your account and ask us to come down to your country for subsequent sharing of the fund according to percentages previously indicated and further investment, either in your country or any country you advice us to invest in.All other necessary information will be sent to you when I hear from you. I suggest you get back to me as soon as possible stating your wish in this deal.You can also call me on phone 228 911 49 94 for phone discussions Best Regard, WILLIAMS KOJO.

1 0

Say�n hugs-users ,
by abdyesilkart.com 16 Jun '02

16 Jun '02

1 0

Win98 notepad and Vi
by Eldrad 03 Jun '02

03 Jun '02

When i load hugs scripts, done on a unix machine on to my win98 machine, Windows notepad loads, showing about 3 lines. how do i get it to display the same way as in Vi?

3 2