asakul
/
pontarius-xmpp
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
258 Commits
1 Branch
0 Tags
2.6 MiB
Tree: 3b688e0380
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from '3b688e0380'
${ noResults }
pontarius-xmpp/source/Utils.hs

8 lines
108 B
Raw Normal View History Unescape

switched to hexpat
14 years ago
module Utils where
whileJust f = do
f' <- f
case f' of
Just x -> x : whileJust f
Nothing -> []