crc/retroforth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

nga-python: begin work to cache dictionary, provide faster versions of some words (working on #20)

Browse source 
FossilOrigin-Name: cdfb621e669956d3ea1ca2c0a5ae74a78f7d90d0c728b2bd4768f53ec904f007
This commit is contained in:
crc 2020-12-16 14:54:46 +00:00
parent a824c5b3aa
commit 858d81b49b
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
vm/nga-python/retro.py
View file

@ -42,8 +42,12 @@ class Retro:
self.files = FileSystem()
self.floats = FloatStack()
self.afloats = FloatStack()
self.interpreter = self.memory.fetch(self.find_entry("interpret") + 1)
self.not_found = self.memory.fetch(self.find_entry("err:notfound") + 1)
self.Dictionary = dict()
self.Cached = dict()
self.Cached['interpreter'] = self.memory.fetch(self.find_entry("interpret") + 1)
self.Cached['not_found'] = self.memory.fetch(self.find_entry("err:notfound") + 1)
self.Cached['s:eq?'] = self.memory.fetch(self.find_entry("s:eq?") + 1)
self.instructions = [
self.i_nop,
self.i_lit,
@ -440,7 +444,7 @@ class Retro:
for token in line.split():
self.inject_string(token, 1024)
self.stack.push(1024)
self.execute(self.interpreter, self.not_found)
self.execute(self.Cached['interpreter'], self.Cached['not_found'])
def run_file(self, file):
if not os.path.exists(file):
@ -456,7 +460,7 @@ class Retro:
for token in line.strip().split():
self.inject_string(token, 1024)
self.stack.push(1024)
self.execute(self.interpreter, self.not_found)
self.execute(self.Cached['interpreter'], self.Cached['not_found'])
def update_image(self):
import requests