[gforth] / gforth / environ.fs  

gforth: gforth/environ.fs

Diff for /gforth/environ.fs between version 1.2 and 1.3

version 1.2, Wed Jul 27 13:37:01 1994 UTC version 1.3, Thu Nov 17 15:53:11 1994 UTC
Line 1 
Line 1 
 \ environmental queries  \ environmental queries
   
 wordlist constant environment-wordlist  \ wordlist constant environment-wordlist
   
   Create environment-wordlist  wordlist drop
   
 : environment? ( c-addr u -- false / ... true )  : environment? ( c-addr u -- false / ... true )
     environment-wordlist search-wordlist if      environment-wordlist search-wordlist if
Line 31 
Line 33 
 -1 MAX-N 2constant MAX-D  -1 MAX-N 2constant MAX-D
 -1. 2constant MAX-UD  -1. 2constant MAX-UD
   
   0 0 2constant gforth \ minor mayor version
   
 \ !! RETURN-STACK-CELLS  \ !! RETURN-STACK-CELLS
 \ !! STACK-CELLS  \ !! STACK-CELLS
   

Generate output suitable for use with a patch program
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help