#!/bin/bash
#
# Summary: PyPy is slower than CPython for parsing.  (I bet it also uses more
# memory, although I didn't measure that.)
#
# I don't plan on using PyPy, but this is simple enough to save for posterity.
#
# Usage:
#   ./pypy.sh <function name>

set -o nounset
set -o pipefail
set -o errexitsetconst global FOO = "bar"

readonly PYPY = ""setconst global FOO = "bar"~/install/pypy2-v5.9.0-linux64/bin/pypy

readonly ABUILD = ""~/git/alpine/abuild/abuild 

proc parse-abuild {
  var vm = $1
  time $vm bin/oil.py osh -n $ABUILD >/dev/null
}

# ~3.5 seconds
proc parse-with-cpython {
  parse-abuild python
}

# ~4.8 seconds
# NOTE: We could run it in a loop to see if the JIT warms up, but that would
# only be for curiousity.  Most shell processes are short-lived, so it's the
# wrong thing to optimize for.
proc parse-with-pypy {
  parse-abuild $PYPY
}

@Argv
(CommandList
  children: [
    (C {(set)} {(-o)} {(nounset)})
    (C {(set)} {(-o)} {(pipefail)})
    (C {(set)} {(-o)} {(errexit)})
    (Assignment
      keyword: Assign_Readonly
      pairs: [
        (assign_pair
          lhs: (LhsName name:PYPY)
          op: Equal
          rhs: {(TildeSubPart prefix:"") (/install/pypy2-v5.9.0-linux64/bin/pypy)}
          spids: [49]
        )
      ]
      spids: [47]
    )
    (Assignment
      keyword: Assign_Readonly
      pairs: [
        (assign_pair
          lhs: (LhsName name:ABUILD)
          op: Equal
          rhs: {(TildeSubPart prefix:"") (/git/alpine/abuild/abuild)}
          spids: [56]
        )
      ]
      spids: [54]
    )
    (FuncDef
      name: parse-abuild
      body: 
        (BraceGroup
          children: [
            (Assignment
              keyword: Assign_Local
              pairs: [
                (assign_pair
                  lhs: (LhsName name:vm)
                  op: Equal
                  rhs: {($ VSub_Number "$1")}
                  spids: [71]
                )
              ]
              spids: [69]
            )
            (TimeBlock
              pipeline: 
                (SimpleCommand
                  words: [{($ VSub_Name "$vm")} {(bin/oil.py)} {(osh)} {(-n)} {($ VSub_Name "$ABUILD")}]
                  redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(/dev/null)} spids:[87])]
                )
            )
          ]
          spids: [66]
        )
      spids: [62 65]
    )
    (FuncDef
      name: parse-with-cpython
      body: (BraceGroup children:[(C {(parse-abuild)} {(python)})] spids:[100])
      spids: [96 99]
    )
    (FuncDef
      name: parse-with-pypy
      body: (BraceGroup children:[(C {(parse-abuild)} {($ VSub_Name "$PYPY")})] spids:[126])
      spids: [122 125]
    )
    (C {(DQ ($ VSub_At "$@"))})
  ]
)