File:  [Coherent Logic Development] / freem / examples / libfreem / kill / kill.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Sun Jan 19 02:04:04 2025 UTC (6 months, 2 weeks ago) by snw
Branches: MAIN, CoherentLogicDevelopment
CVS tags: v0-63-1-rc1, v0-63-0-rc1, v0-63-0, v0-62-3, v0-62-2, v0-62-1, v0-62-0, start, HEAD
FreeM

    1: #include <stdio.h>
    2: #include <string.h>
    3: #include <freem.h>
    4: 
    5: int main(int argc, char **argv, char **envp)
    6: {
    7:     freem_ref_t ref;
    8: 
    9:     /* we're killing a global node */
   10:     ref.reftype = MREF_RT_GLOBAL;
   11: 
   12:     /* access global "car" */
   13:     strcpy(ref.name, "car");
   14: 
   15:     /* set up the subscripts */
   16:     ref.subscript_count = 0;
   17: 
   18:     /* use the USER namespace */
   19:     freem_init("USER");
   20: 
   21:     /* kill the global and all its descendant subscripts */
   22:     freem_kill(&ref);
   23:     
   24: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>