-- Throws an error indicating this module as the source of the error
persistError function msg = error (concat ["Bead.Persistent.SQL.", function, ": ", msg])
persistError function msg = error (concat ["Bead.Persistent.SQL.", function, ": ", msg])
persistError function msg = error (concat ["Bead.Persistent.SQL.", function, ": ", msg])