#CHARS/LINE #BACKSPACE-CHAR #ELSE
#CHARS/LINE
* #CHARS/LINE ( -- n )

Preferred width of line in source files. Suit yourself. 
 62 VALUE    #CHARS/LINE

toolbelt ordinary constant