Revision 0c599ca0
| b/Makefile.am | ||
|---|---|---|
| 1871 | 1871 |
lib/opcodes.py.in_before lib/opcodes.py.in_after \ |
| 1872 | 1872 |
| stamp-directories |
| 1873 | 1873 |
cat $(abs_top_srcdir)/lib/opcodes.py.in_before > $@ |
| 1874 |
src/hs2py >> $@ |
|
| 1874 |
src/hs2py --opcodes >> $@
|
|
| 1875 | 1875 |
cat $(abs_top_srcdir)/lib/opcodes.py.in_after >> $@ |
| 1876 | 1876 |
|
| 1877 | 1877 |
lib/_generated_rpc.py: lib/rpc_defs.py $(BUILD_RPC) |
| b/src/hs2py.hs | ||
|---|---|---|
| 25 | 25 |
|
| 26 | 26 |
import Ganeti.Hs2Py.GenOpCodes |
| 27 | 27 |
|
| 28 |
import System.Environment (getArgs) |
|
| 29 |
import System.Exit (exitFailure) |
|
| 30 |
import System.IO (hPutStrLn, stderr) |
|
| 31 |
|
|
| 28 | 32 |
main :: IO () |
| 29 |
main = putStrLn showPyClasses |
|
| 33 |
main = do |
|
| 34 |
args <- getArgs |
|
| 35 |
case args of |
|
| 36 |
["--opcodes"] -> putStrLn showPyClasses |
|
| 37 |
_ -> do |
|
| 38 |
hPutStrLn stderr "Usage: hs2py --opcodes" |
|
| 39 |
exitFailure |
|
Also available in: Unified diff