fix a bug in unix syscall forth code

FossilOrigin-Name: e6c68dcbcc627134e4c1071819eb0a7d588298a8ccf68a0964983b59688bd1f6
This commit is contained in:
crc 2019-02-05 03:21:25 +00:00
parent 4044fa6293
commit fc63c184ca

View file

@ -115,7 +115,7 @@ seconds.
'pwd file:R unix:popen
dup file:read-line s:trim swap
unix:pclose
#0 sys:argv s:length + '/ s:append ;
#0 'sys:argv d:lookup d:xt fetch call s:length + '/ s:append ;
~~~
~~~