Hi
I dont know if this bug is of much interest to you since it aply to Version: September
1999.
If you are uninterested, just disregard from this mail.
On most hugs interpretators (which I have tries it on) the call
add 1 [0,0,1]
will return [1,0,1]
But on my instalation (both winhugs and the dos mode)
return [0,1,1]
I dont have a clue why but here is the actual code.
The correct return is [1,0,1]
halvad (0,0) = (0,0)
halvad (1,0) = (0,1)
halvad (0,1) = (0,1)
halvad (1,1) = (1,0)
add 0 [] = []
add 1 [] = [1]
add carry (x:xs) = let (car,out) = halvad (carry,x) in
(out:(add car xs))
Good luck and happy buggtraquing.
TIm Gahnstr�m
_______________________________________________
Hugs-Bugs mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/hugs-bugs
