COMMENT @%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

	Copyright (c) GeoWorks 1991 -- All Rights Reserved

PROJECT:	pcgeos
MODULE:		Include - Thesaurus Library Definitions
FILE:		thes.def


REVISION HISTORY:
	
	Name	Date		Description
	----	----		-----------
	tyj	9/3/92		Initial revision


DESCRIPTION:
	Definitions for users of the Thesaurus library.
		
	$Id: thes.def,v 1.1 97/04/04 14:23:44 newdeal Exp $

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%@

StartLibrary	thes

;include sllang.def

global ThesaurusGetMeanings:far
;
;	Get meanings and senses for a given word 
;
;	Pass: cx:dx = pointer to word to look up
; 
;	Return: ^ldx:si = chunk array of null terminated strings, 
;		each of which is one meaning. Note if size = 0, word not found
;				
;		*bx:bp = integer array (0..25). Integers range from 0 to 3, 
;		and represent the part of speech of the corresponding meaning
;		(if that meaning exists). 0 = adj, 1 = noun, 2 = adverb, 3 = verb.*bx:bp 
;
;		ax = success/failure indicator:
;		         number of synonyms/meanings found = success
;			 0 = word not found
;			-1 = memory allocation error
;			-3 = error reading database
;			-4 = error seeking in database;		
;	Destroyed: nothing
;

global ThesaurusGetSynonyms:far
;
;	Takes the number of the sense that is desired (see 
;		ThesaurusGetMeanings) and returns a chunk array of null
;		terminated strings, one per synonym. Note that 
;		ThesaurusGetMeanings must have been called prior 
;		to this function.
;
;	Pass:	cx = sense number corresponding to sense to get synonyms for
;
;	Return: ^ldx:si = chunk array of null-terminated synonym strings
;
;		ax = success/failure indicator:
;			number of senses = success
;			 0 = sense doesn't exist
;		  	-1 = memory allocation error
;			-3 = error reading database
;			-4 = error seeking in database;
;	Destroyed: nothing
;

global ThesaurusOpen:far
global ThesaurusClose:far

EndLibrary	thes


