3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
guix/gnu/packages/patches/gemmi-fix-pegtl-usage.patch
David Elsing 696f20f0f6
gnu: Add gemmi.
* gnu/packages/patches/gemmi-fix-pegtl-usage.patch: New file.
* gnu/packages/patches/gemmi-fix-sajson-types.patch: New file.
* gnu/local.mk (dist_patch_DATA): Register them here.
* gnu/packages/chemistry.scm (gemmi): New variable.

Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
2022-10-15 12:04:54 +02:00

31 lines
1.3 KiB
Diff

Use the definitions from (newer) upstream PEGTL.
diff --git a/include/gemmi/cif.hpp b/include/gemmi/cif.hpp
index c7ffdb44..35d24210 100644
--- a/include/gemmi/cif.hpp
+++ b/include/gemmi/cif.hpp
@@ -37,7 +37,6 @@ namespace pegtl = tao::pegtl;
namespace rules {
template<int TableVal> struct lookup_char {
- using analyze_t = pegtl::analysis::generic<pegtl::analysis::rule_type::ANY>;
template<typename Input> static bool match(Input& in) {
if (!in.empty() && cif::char_table(in.peek_char()) == TableVal) {
if (TableVal == 2) // this set includes new-line
@@ -71,11 +70,11 @@ namespace rules {
struct ws_or_eof : pegtl::sor<whitespace, pegtl::eof> {};
// (b) Reserved words.
- struct str_data : TAOCPP_PEGTL_ISTRING("data_") {};
- struct str_loop : TAOCPP_PEGTL_ISTRING("loop_") {};
- struct str_global : TAOCPP_PEGTL_ISTRING("global_") {};
- struct str_save : TAOCPP_PEGTL_ISTRING("save_") {};
- struct str_stop : TAOCPP_PEGTL_ISTRING("stop_") {};
+ struct str_data : TAO_PEGTL_ISTRING("data_") {};
+ struct str_loop : TAO_PEGTL_ISTRING("loop_") {};
+ struct str_global : TAO_PEGTL_ISTRING("global_") {};
+ struct str_save : TAO_PEGTL_ISTRING("save_") {};
+ struct str_stop : TAO_PEGTL_ISTRING("stop_") {};
struct keyword : pegtl::sor<str_data, str_loop, str_global,
str_save, str_stop> {};