pike.git / src / post_modules / Nettle / hogweed.cmod

version» Context lines:

pike.git/src/post_modules/Nettle/hogweed.cmod:733:    {    CVAR struct ecc_point point;       /*! @decl inherit ECC_Curve::Point    */    EXTRA    {    /* Perform an inherit of the Point class that our parent    * contains via its inherit of __builtin.Nettle.ECC_Curve.    */ -  inherit_internal_class(MK_STRING("Point")); +  lexical_inherit(1, MK_STRING("Point"), 0, REPORT_ERROR);    }       INIT    {    const struct Nettle_ECC_Curve_struct *parent =    parent_storage(1, Nettle_ECC_Curve_program);    const struct ecc_curve *curve = parent->curve;       if (!curve) Pike_error("No curve selected.\n");    ecc_point_init(&THIS->point, curve);
pike.git/src/post_modules/Nettle/hogweed.cmod:940:    program_flags PROGRAM_USES_PARENT|PROGRAM_NEEDS_PARENT|PROGRAM_CLEAR_STORAGE;    {    /*! @decl inherit Point    *!    *! This point represents the public key.    */    EXTRA    {    /* Perform an inherit of the Point class that our parent contains.    */ -  inherit_internal_class(MK_STRING("Point")); +  lexical_inherit(1, MK_STRING("Point"), 0, REPORT_ERROR);    }       /*! @decl inherit __builtin.Nettle.Sign    */    INHERIT "__builtin.Nettle.Sign";       CVAR struct ecc_scalar key;       PIKEVAR function(int(0..):string(0..255)) random    flags ID_PROTECTED;
pike.git/src/post_modules/Nettle/hogweed.cmod:1324:    {    PIKEVAR string(8bit) point flags ID_PRIVATE|ID_PROTECTED|ID_HIDDEN;       /*! @decl inherit ECC_Curve::Point    */    EXTRA    {    /* Perform an inherit of the Point class that our parent    * contains via its inherit of __builtin.Nettle.ECC_Curve.    */ -  inherit_internal_class(MK_STRING("Point")); +  lexical_inherit(1, MK_STRING("Point"), 0, REPORT_ERROR);    }       PIKEFUN void set(string(8bit) x, string(8bit)|void y)    flags ID_VARIANT;    {    if (x->len != CURVE25519_SIZE) {    Pike_error("Invalid x.\n");    }    if (y && y->len) {    Pike_error("Invalid y.\n");
pike.git/src/post_modules/Nettle/hogweed.cmod:1409:    program_flags PROGRAM_USES_PARENT|PROGRAM_NEEDS_PARENT|PROGRAM_CLEAR_STORAGE;    {    /*! @decl inherit Point    *!    *! This point represents the public key.    */    EXTRA    {    /* Perform an inherit of the Point class that our parent contains.    */ -  inherit_internal_class(MK_STRING("Point")); +  lexical_inherit(1, MK_STRING("Point"), 0, REPORT_ERROR);    }       /*! @decl inherit __builtin.Nettle.Sign    */    INHERIT "__builtin.Nettle.Sign";       PIKEVAR string(8bit) private_key flags ID_PRIVATE|ID_HIDDEN;       PIKEVAR function(int(0..):string(0..255)) random    flags ID_PROTECTED;