alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

scm: support --eval

Browse Source 
With the ~--eval~ option you can evaluate an expression in mu/scm
environment. For example:

$ mu scm --eval \
  '(format #t "found ~d match(es)\n" (length (mfind "hello")))'
found 7173 match(es)

Add command-line parameter and implement.
This commit is contained in:
Dirk-Jan C. Binnema
2026-03-07 12:20:35 +02:00
committed by Seth Ladygo
parent cad39e0ff1
commit 6dca68b989
6 changed files with 54 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
scm/mu-scm.cc
View File

@ -1,5 +1,5 @@
/*
** Copyright (C) 2025 Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
** Copyright (C) 2025-2026 Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
**
** This program is free software; you can redistribute it and/or modify it
** under the terms of the GNU General Public License as published by the
@ -272,6 +272,23 @@ Mu::Scm::run_script(const Mu::Store& store, const Mu::Options& opts,
return Ok();
}
Result<void>
Mu::Scm::run_eval(const Mu::Store& store, const Mu::Options& opts, const std::string& expr)
{
if (const auto res = prepare_run(opts, scm_args); !res)
return Err(res.error());
scm_args.emplace_back("-c");
// a little hacky...
scm_args.emplace_back("(use-modules ((mu))) " + expr);
run_scm(store, opts);
return Ok();
}
#ifdef BUILD_TESTS
/*