Skip to content

haskell-gargantext
haskell-gargantext
Commit adfa9d24 authored by Nicolas Pouillard's avatar Nicolas Pouillard
Browse files
Options

faster check-repo-cycles

parent d6f855d4
Pipeline #1132 canceled with stage
    Show whitespace changes
    Inline Side-by-side
    Showing with 14 additions and 15 deletions
    devops/misc/check-repo-cycles.jq
    View file @ adfa9d24
    .state | .state |
    map_values( to_entries[] | .key as $ty | .value |
    map_values( to_entries[] | .key as $list | .value as $m | .value |
    . as $m | ("\($list): \($m|length) size" | debug) as $_ |
    map_values( to_entries[] | .key as $ngram | .value |
    select( # We keep only records with errors select(.root) | debug |
    select( # We keep only records with errors
    .root and # We need .root .root and # We need .root
    ( (
    $m[.root].root != null or # A root should have no root itself $m[.root].root != null or # A root should have no root itself
    .parent != .root and # We need .parent different .root .parent != .root and # We need .parent different .root
    $m[.parent].root != .root # The parent's root should the same root. $m[.parent].root != .root # The parent's root should the same root.
    ) )
    ) ) |
    ) | select(length > 0) # we keep only records with errors {$ty, $list, $ngram, data: .}
    ) | select(length > 0) # we keep only records with errors \ No newline at end of file
    )
    \ No newline at end of file
    Markdown is supported
    0% or
    You are about to add 0 people to the discussion. Proceed with caution.
    Finish editing this message first!
    Please register or to comment