<* PRAGMA LL *>A cache of URL information.
INTERFACEURLCache ; IMPORT HTML, Web; PROCEDURE Put(url: TEXT; READONLY header: Web.Header; contents: TEXT);
Storeheader
andcontents
into cache under the keyurl
.
PROCEDURE Get(url: TEXT; VAR header: Web.Header; VAR contents: TEXT): BOOLEAN;
Retrieve the most recentheader
andcontents
that have been stored under the keyurl
.
PROCEDURE Enable(); PROCEDURE Disable();
Enables or disable subseqent calls to Put
PROCEDURE Flush();
Flush the cache.
PROCEDURE PutHTML(url: TEXT; html: HTML.T);
Storehtml
under the keyurl
.
PROCEDURE GetHTML(url: TEXT; VAR html: HTML.T): BOOLEAN;
Retrieve the most recenthtml
that has been stored underurl
.
PROCEDURE EnableHTML(); PROCEDURE DisableHTML();
Enables or disable subseqent calls to PutHTML
PROCEDURE FlushHTML();
Flush the HTML cache.
END URLCache.