QCaml/top/install_printers.org

• Intall printers

Intall printers

Installs printers in the top-level environment.

All printers are fetched automatically using the following script:

grep "val pp " ../*/*.org \
  | grep -v docs \
  | cut -d ":" -f 1 \
  | sed 's|^../||' \
  | sed 's|.org||' \
  | sed 's|/| |' \
  | sed 's/[^ ]*/\u&/g' \
  | sed 's| |.|' \
  | grep -v Top.Install_printers

result = []
for l in p.split():
  dir, module = l.split('.')
  if dir == module:
      e = f'"{module}.pp" ;'
  else:
      e = f'"{dir}.{module}.pp" ;'
  result.append(e)
result = '\n'.join(result)
print(result)