RosettaCodeData/Task/Concurrent-computing/PARI-GP/concurrent-computing-2.pari

void
foo()
{
  if (pari_daemon()) {
    // Original
    if (pari_daemon()) {
      // Original
      pari_printf("Enjoy\n");
    } else {
      // Daemon #2
      pari_printf("Code\n");
    }
  } else {
    // Daemon #1
    pari_printf("Rosetta\n");
  }
}