dan
/
TIC-80-guile
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge pull request #733 from kostik1337/master 

Added single-param pmem function in wren api
This commit is contained in:
Vadim Grigoruk 2018-09-18 22:25:25 +03:00 committed by GitHub
parent 50e12a53b0 e982e275f7
commit 405d255e19
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/wrenapi.c
View File

@ -91,6 +91,7 @@ class TIC {\n\
foreign static poke4(addr, val)\n\ foreign static poke4(addr, val)\n\
foreign static memcpy(dst, src, size)\n\ foreign static memcpy(dst, src, size)\n\
foreign static memset(dst, src, size)\n\ foreign static memset(dst, src, size)\n\
foreign static pmem(index)\n\
foreign static pmem(index, val)\n\ foreign static pmem(index, val)\n\
foreign static sfx(id)\n\ foreign static sfx(id)\n\
foreign static sfx(id, note)\n\ foreign static sfx(id, note)\n\
@ -1167,6 +1168,7 @@ static WrenForeignMethodFn foreignTicMethods(const char* signature)
if (strcmp(signature, "static TIC.poke4(_,_)" ) == 0) return wren_poke4; if (strcmp(signature, "static TIC.poke4(_,_)" ) == 0) return wren_poke4;
if (strcmp(signature, "static TIC.memcpy(_,_,_)" ) == 0) return wren_memcpy; if (strcmp(signature, "static TIC.memcpy(_,_,_)" ) == 0) return wren_memcpy;
if (strcmp(signature, "static TIC.memset(_,_,_)" ) == 0) return wren_memset; if (strcmp(signature, "static TIC.memset(_,_,_)" ) == 0) return wren_memset;
if (strcmp(signature, "static TIC.pmem(_)" ) == 0) return wren_pmem;
if (strcmp(signature, "static TIC.pmem(_,_)" ) == 0) return wren_pmem; if (strcmp(signature, "static TIC.pmem(_,_)" ) == 0) return wren_pmem;
if (strcmp(signature, "static TIC.sfx(_)" ) == 0) return wren_sfx; if (strcmp(signature, "static TIC.sfx(_)" ) == 0) return wren_sfx;