blob: 3e3bde8fb57310023f2e8b16f887e07cf5acfa9d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
/* Example of a C++ extension to icon via loadfunc,
* without garbage collection difficulties.
* Type 'make iexample' to build.
* Carl Sturtivant, 2008/3/16
*/
#include "loadfuncpp.h"
using namespace Icon;
extern "C" int assignprog(value argv[]) {
safe newname(argv[1]);
&progname = newname;
return FAILED;
}
|
