SOURCE
* SOURCE ( -- value )

traditional variable for forth terminal I/O system.
( >TIB >SPAN >SOURCE BLK )

core ordinary primitive