Sweetbread/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Issues Pull Requests Actions Activity

Update support:

Browse Source 
txt = "test"
stdout(txt[1])

stdout:
e

git-svn-id: svn://kolibrios.org@7307 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
pavelyakov 2018-07-15 19:17:28 +00:00
parent 1fc61a82fa
commit 1e44a9f439
2 changed files with 18 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
programs/cmm/python/library/head.h
View File

@ -27,6 +27,8 @@
#define PY_DCT 16 #define PY_DCT 16
#define PY_NA_STR 32 #define PY_NA_STR 32
#define PY_SYM_STR 33
#define PY_ADD 0 #define PY_ADD 0
#define PY_POW 1 #define PY_POW 1

18
programs/cmm/python/library/opcode.h
View File

@ -377,6 +377,8 @@
dword x = 0; dword x = 0;
dword y = 0; dword y = 0;
dword l = 0; dword l = 0;
byte t = 0;
x = popStack(); x = popStack();
y = popStack(); y = popStack();
@ -389,8 +391,20 @@
IF(l<=x) test("error max list",0); IF(l<=x) test("error max list",0);
IF(0>l) test("error min list",0); IF(0>l) test("error min list",0);
y = DSDWORD[y]; t = DSBYTE[y+4];
pushStack(DSDWORD[x*4+y]);
IF(t==PY_LST)
{
y = DSDWORD[y];
pushStack(DSDWORD[x*4+y]);
return;
}
IF(t==PY_STR)
{
y = DSDWORD[y];
load_const(y+x,PY_STR,1);
return;
}
} }
/* /*