andrius
/
mes
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

core: Prepare for conversion to pointer cells. 

* src/posix.c (execl_): Prepare for conversion to pointer cells.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2019-10-22 09:11:29 +02:00
parent fe22f638ae
commit 986b3973bb
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/posix.c
View File

@ -305,7 +305,8 @@ execl_ (SCM file_name, SCM args) /*:((name . "execl")) */
while (args != cell_nil)
{
assert_msg (TYPE (CAR (args)) == TSTRING, "TYPE (CAR (args)) == TSTRING");
c_argv[i] = CSTRING (CAR (args));
SCM arg = CAR (args);
c_argv[i] = CSTRING (arg);
i = i + 1;
args = CDR (args);
if (g_debug > 2)