Miroirs/sallyforth
1
0
Fork 0
mirror of https://github.com/russolsen/sallyforth synced 2025-01-13 08:01:56 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Renamed process functions to execute, added file execution, vars.

Browse source
This commit is contained in:
Russ Olsen 2020-04-16 09:02:36 -04:00
parent c74f666a19
commit 4886e2de2a
1 changed files with 28 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

33
sallyforth/kernel.py
View file

@ -1,7 +1,7 @@
import sys import sys
from os import path from os import path
from words import * from words import *
from lex import forth_prompt, read_tokens, is_string from lex import forth_prompt, read_tokens, is_string, tokenize
from stack import Stack from stack import Stack
def to_number(token): def to_number(token):
@ -23,9 +23,12 @@ class Forth:
def __init__(self, startup=None): def __init__(self, startup=None):
self.stack = Stack() self.stack = Stack()
self.dictionary = { self.dictionary = {
'*prompt*': const_f("SallyForth>> "),
'true': const_f(True), 'true': const_f(True),
'false': const_f(False), 'false': const_f(False),
'nil': const_f(None), 'nil': const_f(None),
'def': w_def,
'import': w_import,
'0': const_f(0), '0': const_f(0),
'1': const_f(1), '1': const_f(1),
'2': const_f(2), '2': const_f(2),
@ -56,17 +59,37 @@ class Forth:
if startup: if startup:
execute_startup(startup) execute_startup(startup)
def defvar(self, name, value):
self.dictionary[name] = const_f(value)
def evaluate_token(self, token):
self.execute_token(token)
return self.stack.pop()
def compiling(self): def compiling(self):
return self.compiler return self.compiler
def process_line(self, readline_f=forth_prompt): def execute_line(self, readline_f=forth_prompt):
tokens = read_tokens(readline_f) tokens = read_tokens(readline_f)
self.execute_tokens(tokens)
def execute_tokens(self, tokens):
for token in tokens: for token in tokens:
if not self.compiling(): if not self.compiling():
self.interpret_token(token) self.execute_token(token)
else: else:
self.compile_token(token) self.compile_token(token)
def execute_file(self, fpath):
self.defvar('*source*', fpath)
with open(fpath) as f:
line = f.readline()
while line:
tokens = tokenize(line)
self.execute_tokens(tokens)
line = f.readline()
self.defvar('*source*', '')
def compile_token(self, token): def compile_token(self, token):
if self.compiler.name == None: if self.compiler.name == None:
self.compiler.name = token self.compiler.name = token
@ -93,9 +116,9 @@ class Forth:
else: else:
self.compiler.add_instruction(push_value_f(n)) self.compiler.add_instruction(push_value_f(n))
def interpret_token(self, token): def execute_token(self, token):
if is_string(token): if is_string(token):
self.stack.push(token) self.stack.push(token[1::])
return return
if token in self.dictionary: if token in self.dictionary: