H ? « ‹ ← → › »

Language peer sets for PISTOL:
United States↑
United States/1983↑
Designed 1983 ↑
1980s languages ↑
Fourth generation↑
Late Cold War↑
Experimental and other ↑
Experimental and other/1983↑
Experimental and other/us ↑

PISTOL(ID:5309/pis001)

Portably Implemented STack Oriented Language 

alternate simple view
Country: United States
Designed 1983
Sammet category: Experimental and other

for Portably Implemented STack Oriented Language

Ernest E. Bergmann early '80s
Related languages
FORTH → PISTOL   Influence
STOIC → PISTOL   Implementation
References:
  • Bergmann, E.E. (1983) Bergmann, E.E. "PISTOL - A Forth-like Portably Implemented STack Oriented Language", Dr Dobbs Feb83, 12; Jul84, 102
    Resources
    • ′SPECIAL< BRANCH X> SPECIAL< DEFINITIONS X> ′FIRST : .... ; . . X> > DEFINITIONS % finish definitions for X> % SPECIAL< vocabulary CURRENT Variable containing pointer to Vocabulary Branch into which the next word definition will be placed. Normally, this pointer points at the last definition. DEFINITIONS Changes the CURRENT pointer to match the latest Vocabulary Branch on the Vocabulary Stack. Thus, further word definitions will be placed in the Branch that is currently on the top of the Vocabulary stack (see the example given above for BRANCH). FENCE Variable containing lower limit for FORGET, see below. FIND ′ --> (its address) if found --> FALSE if not found FORGET ′ --> Removes all definitions recently defined back back to and including the defintion of . Will ABORT if the address of is below (before) the value of FENCE, see above. NAME TOS --> Takes the TOS as an address of a definition or a "primitive" ( an "opcode" that can be interpreted, even so it is not an address) and prints its name. NAME is used by the disassembler, by TRACE, and by the definition listers, such as NEXT10, below. NEXT10 TOS --> ADDR Takes the TOS as the address of a definition; That definition and the preceding 9 definitions in the same vocabulary are listed by address and NAME. Upon completion, the address of the next logically listable definition, ADDR, is left on stack. So, for example, to list the last thirty definitions one could type: X> TOP10 NEXT10 NEXT10 DROP PISTOL< Accesses the original vocabulary branch of PISTOL. Invoking this word will place (PISTOL<) on the top of the vocabulary stack so that this branch will be first in the search path. PREVIOUS Variable that contains the address of the previous link to the definition last found by FIND or VFIND. It is used by UNLINK and RELINK to obtain the link to the item searched for. PRIMITIVE? TOS --> TRUE|FALSE Decides whether the TOS is a suitable value to be an "opcode" to be executed directly by the PISTOL "primitive" interpreter, PINT, as opposed to the address of a higher level definition. It is used by NAME to decide that TOS is not the address of a definition entry. RELINK ′ --> Searches the UNLINKED< Vocabulary Branch for the definition; if found, it is removed from that Branch and (re)attached to the Vocabulary Branch that is at the top of the Vocabulary Stack. TOP10 --> ADDR Lists the ten most recent definitions in the CURRENT vocabulary branch. It leaves the address of the next definition to be listed on the stack to be available for NEXT10; see the example of use above for NEXT10. UNLINK ′ --> Searches for the definition; if found, it is removed from its vocabulary branch and attached to the UNLINKED< vocabulary branch. It is used to removed from the usual search path those definitions which are no longer of use or which are too dangerous to be easily accessible. UNLINKED< Vocabulary branch into which all UNLINKed definitions are placed (see UNLINK, RELINK). Invoking UNLINKED< will place (UNLINKED<) at the top of the vocabulary stack. VADDRESS ′ VOCAB --> (address) Similar to ADDRESS, but only the specified vocabulary branch is searched. VFIND ′ VOCAB --> (address)|FALSE Similar to FIND, except that only the specified vocabulary branch is searched. VLIST --> ADDR Lists the ten most recent definitions in the topmost branch on vocabulary stack. It leaves the address of the next definition to be listed on the stack to be available for NEXT10; similar to TOP10 (see above). : ');">Extract: Word list
    • Online manual
    Search in: Google  Google scholar  World Cat  Yahoo  Overture  DBLP  Monash bib  NZ  IEEE  ACM portal  CiteSeer  CSB  ncstrl  jstor  Bookfinder