LEXALK ;ISL/KER - Look-up by Words ;05/23/2017
Source file <LEXALK.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Look-up user input
|
|
END | ; End look-up by word
|
|
EXACT | ; Main loop throuth TOKENS that equal LEXT
|
|
TOKEN | ; Main loop though TOKENS containing LEXT
|
|
IEN | ; Loop throuth Internal Entry Numbers
|
|
CHK | ; Check each token
|
|
CHKTKNS(LEXE) | ; Check tokens
|
|
DES(LEXX) | ; Get description flag
|
|
SCH(LEXX) | ; Search for LEXX a $Orderable variable
|
|
KWO(X,Y) | ; Keyword only (SW)
|
|
UP(X) | ; Uppercase
|