IntrinsicMethodPatch

InstallPatch

Attributes

Class IntrinsicMethodPatch defines no new attributes.

Fields

instance IntrinsicMethodPatch tag;
   classToPatch: nilClass;
codeAddressOfPatch: 0;
intrinsicToPatch: nilOperation;
end instance;

Define Class IntrinsicMethodPatch;
    inherits from MethodPatch;
    
    field intrinsicToPatch: IntrinsicNumber;

    overrides InstallPatch;
        // For intrinsics, all we have to do is replace the old
        // intrinsic in the system intrinsic list.  Patched calls
        // work because the globals for them have been set
        // up for this patch package before InstallPatch is called.
    
end class;