> module Boldstar
>        (boldstar)
>        where

> import Process

> boldstar :: [Char] -> [Char]
> boldstar = process '*' '*' "<bold>" "</bold>"