File:  [gforth] / gforth / wordsets.fs
Revision 1.4: download - view: text, annotated - select for diffs
Sun Mar 9 12:54:33 2003 UTC (21 years ago) by anton
Branches: MAIN
CVS tags: HEAD
added copyright messages to a lot of files
removed some obsolete or non-source files

    1: \ WORDSETS.STR  All the words of the Wordsets           03may93jaw
    2: 
    3: \ Copyright (C) 1995 Free Software Foundation, Inc.
    4: 
    5: \ This file is part of Gforth.
    6: 
    7: \ Gforth is free software; you can redistribute it and/or
    8: \ modify it under the terms of the GNU General Public License
    9: \ as published by the Free Software Foundation; either version 2
   10: \ of the License, or (at your option) any later version.
   11: 
   12: \ This program is distributed in the hope that it will be useful,
   13: \ but WITHOUT ANY WARRANTY; without even the implied warranty of
   14: \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   15: \ GNU General Public License for more details.
   16: 
   17: \ You should have received a copy of the GNU General Public License
   18: \ along with this program; if not, write to the Free Software
   19: \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
   20: 
   21: WS CORE
   22: 
   23: ^ ! ^ # ^ #> ^ #S ^ ' ^ ( ^ * ^ */ ^ */MOD ^ + ^ +! ^ +LOOP
   24: ^ , ^ - ^ . ^ ." ^ / ^ /MOD ^ 0< ^ 0= ^ 1+ ^ 1- ^ 2! ^ 2* ^ 2/
   25: ^ 2@ ^ 2DROP ^ 2DUP ^ 2OVER ^ 2SWAP ^ : ^ ; ^ < ^ <# ^ = ^ >
   26: ^ >BODY ^ >IN ^ >NUMBER ^ >R ^ ?DUP ^ @ ^ ABORT ^ ABORT"
   27: ^ ABS ^ ACCEPT ^ ALIGN ^ ALIGNED ^ ALLOT ^ AND ^ BASE ^ BEGIN
   28: ^ BL ^ C! ^ C, ^ C@ ^ CELL+ ^ CELLS ^ CHAR ^ CHAR+ ^ CHARS
   29: ^ CONSTANT ^ COUNT ^ CR ^ CREATE ^ DECIMAL ^ DEPTH ^ DO ^ DOES>
   30: ^ DROP ^ DUP ^ ELSE ^ EMIT ^ ENVIRONMENT? ^ EVALUATE ^ EXECUTE
   31: ^ EXIT ^ FILL ^ FIND ^ FM/MOD ^ HERE ^ HOLD ^ I ^ IF ^ IMMEDIATE
   32: ^ INVERT ^ J ^ KEY ^ LEAVE ^ LITERAL ^ LOOP ^ LSHIFT ^ M* ^ MAX
   33: ^ MIN ^ MOD ^ MOVE ^ NEGATE ^ OR ^ OVER ^ POSTPONE ^ QUIT
   34: ^ R> ^ R@ ^ RECURSE ^ REPEAT ^ ROT ^ RSHIFT ^ S" ^ S>D
   35: ^ SIGN ^ SM/REM ^ SOURCE ^ SPACE ^ SPACES ^ STATE ^ SWAP
   36: ^ THEN ^ TYPE ^ U. ^ U< ^ UM* ^ UM/MOD ^ UNLOOP ^ UNTIL ^ VARIABLE
   37: ^ WHILE ^ WORD ^ XOR ^ [ ^ ['] ^ [CHAR] ^ ]
   38: 
   39: WS CORE-EXT
   40: 
   41: ^ #TIB ^ .( ^ .R ^ 0<> ^ 0> ^ 2>R ^ 2R> ^ 2R@ ^ :NONAME ^ <>
   42: ^ ?DO ^ AGAIN ^ C" ^ CASE ^ COMPILE, ^ CONVERT ^ ENDCASE
   43: ^ ENDOF ^ ERASE ^ EXPECT ^ FALSE ^ HEX ^ MARKER ^ NIP ^ OF
   44: ^ PAD ^ PARSE ^ PICK ^ QUERY ^ REFILL ^ RESTORE-INPUT ^ ROLL
   45: ^ SAVE-INPUT ^ SOURCE-ID ^ SPAN ^ TIB ^ TO ^ TRUE ^ TUCK ^ U.R
   46: ^ U> ^ UNUSED ^ VALUE ^ WITHIN ^ [COMPILE] ^ \
   47: 
   48: WS BLOCK
   49: 
   50: ^ BLK ^ BLOCK ^ BUFFER ^ EVALUATE ^ FLUSH ^ LOAD ^ SAVE-BUFFERS
   51: ^ UPDATE
   52: 
   53: WS BLOCK-EXT
   54: 
   55: ^ EMPTY-BUFFERS ^ LIST ^ REFILL ^ SCR ^ THRU ^ \
   56: 
   57: WS DOUBLE
   58: 
   59: ^ 2CONSTANT ^ 2LITERAL ^ 2VARIABLE ^ D+ ^ D- ^ D. ^ D.R ^ D0<
   60: ^ D0= ^ D2* ^ D2/ ^ D< ^ D= ^ D>S ^ DABS ^ DMAX ^ DMIN ^ DNEGATE
   61: ^ M*/ ^ M+
   62: 
   63: WS DOUBLE-EXT
   64: 
   65: ^ 2ROT ^ DU<
   66: 
   67: WS EXEPTION
   68: 
   69: ^ CATCH ^ THROW
   70: 
   71: WS EXEPTION-EXT
   72: 
   73: ^ ABORT ^ ABORT"
   74: 
   75: WS FACILITY
   76: 
   77: ^ AT-XY ^ KEY? ^ PAGE
   78: 
   79: WS FACILITY-EXT
   80: 
   81: ^ EKEY ^ EKEY>CHAR ^ EKEY? ^ EMIT? ^ MS ^ TIME&DATE
   82: 
   83: WS FILE
   84: 
   85: ^ (  ^ BIN ^ CLOSE-FILE ^ CREATE-FILE ^ DELETE-FILE
   86: ^ FILE-POSITION ^ FILE-SIZE ^ INCLUDE-FILE ^ INCLUDED
   87: ^ OPEN-FILE ^ R/O ^ R/W ^ READ-FILE ^ READ-LINE ^ REPOSITION-FILE
   88: ^ RESIZE-FILE ^ S" ^ SOURCE-ID ^ W/O ^ WRITE-FILE ^ WRITE-LINE
   89: 
   90: WS FILE-EXT
   91: 
   92: ^ FILE-STATUS ^ FLUSH-FILE ^ REFILL ^ RENAME-FILE
   93: 
   94: WS FLOAT
   95: 
   96: ^ >FLOAT ^ D>F ^ F! ^ F* ^ F+ ^ F- ^ F/ ^ F0< ^ F0= ^ F< ^ F>D
   97: ^ F@ ^ FALIGN ^ FALIGNED ^ FCONSTANT ^ FDEPTH ^ FDROP ^ FDUP
   98: ^ FLITERAL ^ FLOAT+ ^ FLOATS ^ FLOOR ^ FMAX ^ FMIN ^ FNEGATE
   99: ^ FOVER ^ FROT ^ FROUND ^ FSWAP ^ FVARIABLE ^ REPRESENT
  100: 
  101: WS FLOAT-EXT
  102: 
  103: ^ DF! ^ DF@ ^ DFALIGN ^ DFALIGNED ^ DFLOAT+ ^ DFLOATS ^ F**
  104: ^ F. ^ FABS ^ FACOS ^ FACOSH ^ FALOG ^ FASIN ^ FASINH ^ FATAN
  105: ^ FATAN2 ^ FATANH ^ FCOS ^ FCOSH ^ FE. ^ FEXP ^ FEXPM1
  106: ^ FLN ^ FLNP1 ^ FLOG ^ FS. ^ FSIN ^ FSINCOS ^ FSINH
  107: ^ FSQRT ^ FTAN ^ FTANH ^ F~ ^ PRECISION ^ SET-PRECISION
  108: ^ SF! ^ SF@ ^ SFALIGN ^ SFALIGNED ^ SFLOAT+ ^ SFLOATS
  109: 
  110: WS LOCAL
  111: 
  112: ^ (LOCAL) ^ TO
  113: 
  114: WS LOCAL-EXT
  115: 
  116: ^ LOCALS|
  117: 
  118: WS MEMORY
  119: 
  120: ^ ALLOCATE ^ FREE ^ RESIZE
  121: 
  122: WS TOOLKIT
  123: 
  124: ^ .S ^ ? ^ DUMP ^ SEE ^ WORDS
  125: 
  126: WS TOOLKIT-EXT
  127: 
  128: ^ ;CODE ^ AHEAD ^ ASSEMBLER ^ BYE ^ CODE ^ CS-PICK ^ CS-ROLL
  129: ^ EDITOR ^ FORGET ^ STATE ^ [ELSE] ^ [IF] ^ [THEN]
  130: 
  131: WS SEARCH
  132: 
  133: ^ DEFINITIONS ^ FIND ^ FORTH-WORDLIST ^ GET-CURRENT ^ GET-ORDER
  134: ^ SEARCH-WORDLIST ^ SET-CURRENT ^ SET-ORDER ^ WORDLIST
  135: 
  136: WS SEARCH-EXT
  137: 
  138: ^ ALSO ^ FORTH ^ ONLY ^ ORDER ^ PREVIOUS
  139: 
  140: WS STRING
  141: 
  142: ^ -TRAILING ^ /STRING ^ BLANK ^ CMOVE ^ CMOVE> ^ COMPARE ^ SEARCH
  143: ^ SLITERAL
  144: 

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>