###1964js - JavaScript/HTML5 port of 1964 - N64 emulator
Copyright (C) 2012 Joel Middendorf

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.###

C1964jsEmulator::flushDynaCache = ->
  "use strict"
  pc = undefined
  if @writeToDom is false
    for pc of @code
      delete @code[pc]
      alert "@code[pc] failed to delete."  if @code[pc]
    delete @code

    @code = {}
  else
    while @kk
      @kk -= 1
      @deleteFunction @kk
  return

#must not use strict here.
C1964jsEmulator::deleteFunction = (k) ->

  #log('cleanup');
  fnName = undefined
  splitResult = undefined
  s = document.getElementsByTagName("script")[k]
  splitResult = s.text.split("_")
  splitResult = splitResult[1].split("(")
  fnName = "_" + splitResult[0]
  s.parentNode.removeChild s

  #allow deletion of this function
  #eval fnName + "= function (r, s, t, v){}; delete " + fnName + ";"
  window[fnName] = null
  alert "window[fnName] should have been null."  if window[fnName]
  return

C1964jsEmulator::flushRspDynaCache = (rsp) ->
  "use strict"
  pc = undefined
  if @writeToDom is false
    for pc of @code
      delete @code[pc]
      alert "@code[pc] failed to delete."  if @code[pc]
    delete @code

    @code = {}
  else
    @deleteRspFunctions "rsp", rsp
  return

#must not use strict here.
C1964jsEmulator::deleteRspFunctions = (className, rsp) ->
  fnName = undefined
  splitResult = undefined
  s = document.getElementsByClassName("rsp")
  k = s.length - 1
  while s.length > 0
    splitResult = s[k].text.split("_")
    splitResult = splitResult[1].split("(")
    fnName = "_" + splitResult[0]
    s[k].parentNode.removeChild s[k]
    rsp.kk -= 1
    k -= 1

    #allow deletion of this function
    #eval fnName + "= function (r, s, t, v){}; delete " + fnName + ";"
    window[fnName] = null
    alert "window[fnName] should have been null."  if window[fnName]
  return

C1964jsEmulator::deleteRspFunction = (className, rsp) ->
  fnName = undefined
  splitResult = undefined
  s = document.getElementsByClassName("rsp")
  k = s.length - 1
  while s.length > 0
    splitResult = s[k].text.split("_")
    splitResult = splitResult[1].split("(")
    fnName = "_" + splitResult[0]
    s[k].parentNode.removeChild s[k]
    rsp.kk -= 1
    k -= 1

    #allow deletion of this function
    #eval fnName + "= function (r, s, t, v){}; delete " + fnName + ";"
    window[fnName] = null
    alert "window[fnName] should have been null."  if window[fnName]
  return