Skip to content

Instantly share code, notes, and snippets.

@PhotonQuantum
Created July 15, 2024 20:20
Show Gist options
  • Save PhotonQuantum/ca29590e16db148137de83e85f4907ac to your computer and use it in GitHub Desktop.
Save PhotonQuantum/ca29590e16db148137de83e85f4907ac to your computer and use it in GitHub Desktop.
Coq ctags generation snippet.
#!/usr/bin/env bash
set -euo pipefail
COMPCERT_SRC=~/temp/CompCert-3.7
CTAGS_DEFINITION=/Users/lightquantum/.config/coq.ctags
# Generate tags for Compcert + stdlib + all files under cwd
IFS=" " read -r -a loadpath <<< "$(echo 'Print LoadPath.' | coqtop 2>/dev/null | python loadpath.py)"
find . ${loadpath[@]} $COMPCERT_SRC -type f -name "*.v" -print0 | xargs -0 ctags --options=$CTAGS_DEFINITION
#!/usr/bin/env python
import re
import sys
def main():
# Parse `Print Loadpath` and return loaded coq library names.
src = "\n".join(sys.stdin.readlines())
pat = re.compile("^[\w.]+\n? +(\/.+\/[^\n\/]+)", re.MULTILINE);
print(" ".join(pat.findall(src)))
if __name__ == "__main__":
main()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment