diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-07-20 12:14:30 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-07-20 12:14:30 +0300 |
commit | 69751df3b8f70a6e62f497a8870d81d5d1e14aa4 (patch) | |
tree | 85c3f2cf2d4bb091c910cc64ddb408b26f5c3e7d /src/cmdline.opt | |
parent | b6aabc9c0877eb5c209244a93627ae232cf71d4d (diff) | |
download | idest-69751df3b8f70a6e62f497a8870d81d5d1e14aa4.tar.gz idest-69751df3b8f70a6e62f497a8870d81d5d1e14aa4.tar.bz2 |
Implement --format option.
* Makefile.am (SUBDIRS): Add scheme (conditionally).
* configure.ac (IDEST_COND_GUILE): New condition.
* examples/dry-run.scm: Move to scheme.
* examples/Makefile.am: Update.
* src/Makefile.am (AM_CPPFLAGS): Add VERSION_SITE.
* src/cmdline.opt: New options --format and --load-path.
* src/editem.c (str_split_col): Remove static qualifier.
* src/guile.c (guile_add_load_path): New function.
(load_startup_file): Flush user additions to the load path.
Add VERSION_SITE at the beginning.
* src/idest.h (list_supported_frames)
(str_split_col,guile_add_load_path): New protos.
* src/main.c (format_name): New global.
(main): Handle --format option.
* scheme/dry-run.scm: New file (from examples)
* scheme/format.scm: New file.
* scheme/idest/format/shortlist.scm: New file.
Diffstat (limited to 'src/cmdline.opt')
-rw-r--r-- | src/cmdline.opt | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/src/cmdline.opt b/src/cmdline.opt index 36478f0..3fc84e4 100644 --- a/src/cmdline.opt +++ b/src/cmdline.opt @@ -189,6 +189,12 @@ BEGIN optind = argc; /* Stop argument processing */ END +OPTION(format,H,NAME, + [<apply external format NAME>]) +BEGIN + format_name = optarg; +END + OPTION(function,f,NAME, [<guile function to call>]) BEGIN @@ -203,7 +209,13 @@ BEGIN else guile_debug = 1; END - + +OPTION(load-path,P,PATH, + [<set load path>]) +BEGIN + guile_add_load_path(optarg); +END + >]) OPTIONS_END |