Skip to content
GitLab
Commit e6e36c2b authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Fix thd3

parent 6d2b0b34
Hide whitespace changes
Inline Side-by-side
utils/nofib-analyse/GenUtils.lhs
View file @ e6e36c2b
......@@ -163,7 +163,7 @@ Gofer-like stuff:
> fst3 (a,_,_) = a
> snd3 (_,a,_) = a
> thd3 (_,a,_) = a
> thd3 (_,_,a) = a
> cjustify, ljustify, rjustify :: Int -> String -> String
> cjustify n s = space halfm ++ s ++ space (m - halfm)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment