Fossil

Check-in [cb531a54]
Login

Check-in [cb531a54]

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Corrected th1 lappend to persist its result, as reported in forum post 97f8815dd3ddd7df.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: cb531a541663ad095adfe5027ffd980f3f97235e54f68380df210dbbc7b449bc
User & Date: stephan 2021-09-21 08:01:27
Context
2021-09-21
09:47
Fixed a comment to match the code, as reported on the forum. ... (check-in: 898b8f20 user: wyoung tags: trunk)
08:01
Corrected th1 lappend to persist its result, as reported in forum post 97f8815dd3ddd7df. ... (check-in: cb531a54 user: stephan tags: trunk)
06:22
Assorted small improvements to the gitusers doc ... (check-in: 7cd51fa3 user: wyoung tags: trunk)
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to src/th_lang.c.

255
256
257
258
259
260
261

262
263
264
265
266
267
268
    zList = Th_TakeResult(interp, &nList);
  }

  for(i=2; i<argc; i++){
    Th_ListAppend(interp, &zList, &nList, argv[i], argl[i]);
  }


  Th_SetResult(interp, zList, nList);
  Th_Free(interp, zList);

  return TH_OK;
}









>







255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
    zList = Th_TakeResult(interp, &nList);
  }

  for(i=2; i<argc; i++){
    Th_ListAppend(interp, &zList, &nList, argv[i], argl[i]);
  }

  Th_SetVar(interp, argv[1], argl[1], zList, nList);
  Th_SetResult(interp, zList, nList);
  Th_Free(interp, zList);

  return TH_OK;
}