Mercurial > repos > tabletprog

comparison runtime/progfoot.inc @ 87:25bc8a5ab41e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Improve llMessage a bit and move implementation of string into string.tp module using llMessage. Update TASKS list
author Mike Pavone <pavone@retrodev.com>
date Sun, 22 Jul 2012 14:18:34 -0700
parents abc6f3d644a4
children 18598163e3ef
comparison
equal deleted inserted replaced
86:ce6a81b3be70 87:25bc8a5ab41e
41 GC_INIT(); 41 GC_INIT();
42 array * arr = alloc_array(argc); 42 array * arr = alloc_array(argc);
43 for (i = 0; i < argc; ++i) { 43 for (i = 0; i < argc; ++i) {
44 arg = (string *)make_object(&string_meta, NULL, 0); 44 arg = (string *)make_object(&string_meta, NULL, 0);
45 arg->data = argv[i]; 45 arg->data = argv[i];
46 arg->bytes = arg->length = strlen(argv[i]); 46 arg->bytes = arg->len = strlen(argv[i]);
47 arr->data[i] = &(arg->header); 47 arr->data[i] = &(arg->header);
48 } 48 }
49 object * ret = mcall(METHOD_ID_MAIN, 2, mainModule(), &(arr->header)); 49 object * ret = mcall(METHOD_ID_MAIN, 2, mainModule(), &(arr->header));
50 if (ret->meta == &obj_int32_meta) { 50 if (ret->meta == &obj_int32_meta) {
51 obj_int32 * reti32 = (obj_int32 *) ret; 51 obj_int32 * reti32 = (obj_int32 *) ret;