Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: 9a9af21a2e
Fetching contributors…

Cannot retrieve contributors at this time

executable file 33 lines (28 sloc) 1.099 kB
{-# OPTIONS -fglasgow-exts #-}
-----------------------------------------------------------------------------
-- |
-- Module : Turbinado.Exception
-- Copyright : (c) Alson Kemp 2008, Niklas Broberg 2008
-- License : BSD-style (see the file LICENSE)
--
-- Maintainer : Alson Kemp (alson@alsonkemp.com)
-- Stability : experimental
-- Portability : needs dynamic exceptions and deriving Typeable
--
-- Defines a datatype for runtime exceptions that may arise during
-- the evaluation of a Turbinado page.
-----------------------------------------------------------------------------
module Turbinado.View.Exception (
Exception(..),
throwView
) where
import Data.Typeable
import Control.Exception (throwDyn)
data Exception
= ParameterLookupFailed String -- ^ User tried to do an irrefutable parameter lookup
-- that failed.
-- | ... I'm sure there should be more exceptions, we'll add them when we get to them.
deriving (Eq, Show, Typeable)
-- Internal funcion that throws a dynamic exception particular to Turbinado.
throwView :: Exception -> a
throwView = throwDyn
Jump to Line
Something went wrong with that request. Please try again.