Statistics
| Branch: | Tag: | Revision:

root / src / Ganeti / WConfd / Core.hs @ 0efada2a

History | View | Annotate | Download (1.2 kB)

1 13f59e11 Petr Pudlak
{-# LANGUAGE TemplateHaskell #-}
2 13f59e11 Petr Pudlak
3 13f59e11 Petr Pudlak
{-| The Ganeti WConfd core functions.
4 13f59e11 Petr Pudlak
5 13f59e11 Petr Pudlak
As TemplateHaskell require that splices be defined in a separate
6 13f59e11 Petr Pudlak
module, we combine all the TemplateHaskell functionality that HTools
7 13f59e11 Petr Pudlak
needs in this module (except the one for unittests).
8 13f59e11 Petr Pudlak
9 13f59e11 Petr Pudlak
-}
10 13f59e11 Petr Pudlak
11 13f59e11 Petr Pudlak
{-
12 13f59e11 Petr Pudlak
13 13f59e11 Petr Pudlak
Copyright (C) 2013 Google Inc.
14 13f59e11 Petr Pudlak
15 13f59e11 Petr Pudlak
This program is free software; you can redistribute it and/or modify
16 13f59e11 Petr Pudlak
it under the terms of the GNU General Public License as published by
17 13f59e11 Petr Pudlak
the Free Software Foundation; either version 2 of the License, or
18 13f59e11 Petr Pudlak
(at your option) any later version.
19 13f59e11 Petr Pudlak
20 13f59e11 Petr Pudlak
This program is distributed in the hope that it will be useful, but
21 13f59e11 Petr Pudlak
WITHOUT ANY WARRANTY; without even the implied warranty of
22 13f59e11 Petr Pudlak
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
23 13f59e11 Petr Pudlak
General Public License for more details.
24 13f59e11 Petr Pudlak
25 13f59e11 Petr Pudlak
You should have received a copy of the GNU General Public License
26 13f59e11 Petr Pudlak
along with this program; if not, write to the Free Software
27 13f59e11 Petr Pudlak
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
28 13f59e11 Petr Pudlak
02110-1301, USA.
29 13f59e11 Petr Pudlak
30 13f59e11 Petr Pudlak
-}
31 13f59e11 Petr Pudlak
32 13f59e11 Petr Pudlak
module Ganeti.WConfd.Core where
33 13f59e11 Petr Pudlak
34 13f59e11 Petr Pudlak
import Language.Haskell.TH (Name)
35 13f59e11 Petr Pudlak
36 13f59e11 Petr Pudlak
import Ganeti.WConfd.Monad
37 13f59e11 Petr Pudlak
38 13f59e11 Petr Pudlak
-- * The list of all functions exported to RPC.
39 13f59e11 Petr Pudlak
40 13f59e11 Petr Pudlak
-- Just a test function
41 13f59e11 Petr Pudlak
echo :: String -> WConfdMonad String
42 13f59e11 Petr Pudlak
echo = return
43 13f59e11 Petr Pudlak
44 13f59e11 Petr Pudlak
exportedFunctions :: [Name]
45 13f59e11 Petr Pudlak
exportedFunctions = [ 'echo ]