tilia-0.1.3.0: corpora/vendored/other/cpp/macro-between-equations.hs

{-# LANGUAGE CPP #-}

-- A use standing for an equation stays at the margin between the equations
-- around it.
module Table.Lookup where

#define ENTRY(k, v) lookupEntry k = v

lookupEntry :: Int -> String
lookupEntry 0 = "zero"
ENTRY(1, "one")
lookupEntry _ = "many"