linguist/enum.frt at 9e50e188a813ce5a1885d40c8aacd8b0128377c7 - linguist - Schleppe Git

KevinMidboe/linguist

mirror of https://github.com/KevinMidboe/linguist.git synced 2025-10-29 09:40:21 +00:00

Files

Arfon Smith 9e50e188a8 Merge branch 'master' into 1233-local

Conflicts:
	lib/linguist/language.rb
	lib/linguist/languages.yml
	lib/linguist/samples.json

2014-11-01 10:04:22 -05:00

8 lines

176 B

Forth

Raw Blame History

 \ Implements ENUM.
 \ Double DOES>!
 : enum   create 0 ,  does> create dup @ 1 rot +! ,  does> @ ;
 \ But this is simpler.
 : enum   create 0 ,  does> dup @ constant 1 swap +! ;