michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(bin/linja): pass -D config option to lean

Browse source 
Close #196
This commit is contained in:
Soonho Kong 2014-09-15 13:02:02 -07:00
parent 2bdc415a34
commit 254d861970
2 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
bin/linja
View file

@ -404,13 +404,14 @@ def expand_target_to_fullname(target):
def parse_arg(argv): def parse_arg(argv):
global g_working_dir global g_working_dir
parser = argparse.ArgumentParser(description='linja: ninja build wrapper for Lean theorem prover.') parser = argparse.ArgumentParser(description='linja: ninja build wrapper for Lean theorem prover.')
parser.add_argument('--flycheck', '-F', action='store', type=int, default=None, const=120, nargs='?', help="Use --flycheck option for Lean.") parser.add_argument('--flycheck', '-F', action='store_true', default=False, help="Use --flycheck option for Lean.")
parser.add_argument('--flycheck-max-messages', action='store', type=int, default=None, const=999999, nargs='?', help="Number of maximum flycheck messages to display.") parser.add_argument('--flycheck-max-messages', action='store', type=int, default=None, const=999999, nargs='?', help="Number of maximum flycheck messages to display.")
parser.add_argument('--cache', action='store', help="Use specified cache (clean) file.") parser.add_argument('--cache', action='store', help="Use specified cache (clean) file.")
parser.add_argument('--directory', '-C', action='store', help="change to DIR before doing anything else.") parser.add_argument('--directory', '-C', action='store', help="change to DIR before doing anything else.")
parser.add_argument('--lean-config-option', '-D', action='append', help="set a Lean configuration option (name=value)")
parser.add_argument('targets', nargs='*') parser.add_argument('targets', nargs='*')
args = parser.parse_args(argv) args = parser.parse_args(argv)
if (args.flycheck == None and args.flycheck_max_messages != None): if (args.flycheck == False and args.flycheck_max_messages != None):
error("Please use --flycheck option with --flycheck-max-messages option.") error("Please use --flycheck option with --flycheck-max-messages option.")
if args.cache: if args.cache:
args.cache = expand_target_to_fullname(args.cache) args.cache = expand_target_to_fullname(args.cache)
@ -430,7 +431,8 @@ def get_lean_options(args):
options = [] options = []
if args.flycheck: if args.flycheck:
options.append("--flycheck") options.append("--flycheck")
options.append("-D pp.width=%d" % args.flycheck) for item in args.lean_config_option:
options.append("-D" + item)
return options return options
def clear_cache(project_dir, args): def clear_cache(project_dir, args):

2
src/emacs/lean-flycheck.el
View file

@ -5,6 +5,7 @@
;; ;;
(require 'lean-settings) (require 'lean-settings)
(require 'lean-option)
(defun lean-flycheck-command () (defun lean-flycheck-command ()
"Concat lean-flychecker-checker-name with options" "Concat lean-flychecker-checker-name with options"
@ -13,6 +14,7 @@
lean-flycheck-checker-options lean-flycheck-checker-options
'("--cache") '("--cache")
'(source-original) '(source-original)
'((eval (lean-option-string)))
'("--") '("--")
'(source-inplace))) '(source-inplace)))