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

use ~~~ instead of ````

Browse source 
FossilOrigin-Name: 4d83846aa3c434a2fc8b296dbfd4ede49df11b5cae85811daf759a0e7d9a9e9f
This commit is contained in:
crc 2017-10-20 01:10:38 +00:00
parent 1fcd6931eb
commit e134147f17
2 changed files with 197 additions and 207 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

392
literate/RetroForth.md
View file

File diff suppressed because it is too large Load diff

12
tools/extend.c
View file

@ -68,16 +68,6 @@ int d_name(CELL dt);
int d_lookup(CELL Dictionary, char *name);
CELL d_xt_for(char *Name, CELL Dictionary);
CELL d_class_for(char *Name, CELL Dictionary);
CELL ioGetFileHandle();
CELL ioOpenFile();
CELL ioReadFile();
CELL ioWriteFile();
CELL ioCloseFile();
CELL ioGetFilePosition();
CELL ioSetFilePosition();
CELL ioGetFileSize();
CELL ioDeleteFile();
void ioFlushFile();
void update_rx();
void execute(int cell);
void evaluate(char *s);
@ -110,7 +100,7 @@ int include_file(char *fname) {
while (!feof(fp))
{
read_token(fp, source, 0);
if (strcmp(source, "````") == 0) {
if (strcmp(source, "~~~") == 0) {
if (inBlock == 0)
inBlock = 1;
else