File:  [local] / rpl / modules / sets / sets.rplc
Revision 1.7: download - view: text, annotated - select for diffs - revision graph
Sun Jul 30 21:59:03 2017 UTC (6 years, 9 months ago) by bertrand
Branches: MAIN
CVS tags: rpl-4_1_35, rpl-4_1_34, rpl-4_1_33, rpl-4_1_32, rpl-4_1_31, rpl-4_1_30, rpl-4_1_29, rpl-4_1_28, rpl-4_1_27, HEAD
Ajout de L->S et de S->L.

    1: // Attention, la définition de __RPLC_MAIN n'est obligatoire que parce qu'on
    2: // ne compile pas les bibliothèques avec mkrplso puisque à ce moment,
    3: // l'environnement RPL/2 n'est pas encore installé.
    4: 
    5: #define __RPLC_MAIN
    6: #include "src/rplexternals.h"
    7: #include "sets.h"
    8: 
    9: libraryName(sets);
   10: 
   11: declareSubroutine(onLoading)
   12:     notice(stdout, "\nSets library V1R1 for RPL/2 (C) 2017 BERTRAND Joel\n");
   13:     notice(stdout, "Sets library loaded.\n\n");
   14: endSubroutine
   15: 
   16: declareSubroutine(onClosing)
   17:     notice(stdout, "\nSets library unloaded.\n\n");
   18: endSubroutine
   19: 
   20: exportExternalFunctions(
   21:         complement,
   22:         intersection,
   23:         l->s,
   24:         s->l,
   25:         union);
   26: 
   27: // vim: ts=4

CVSweb interface <joel.bertrand@systella.fr>