- 2dup 1 ensure-arg-count
- car character-type ensure-arg-type
-
- displaychar
-
- none
-; make-primitive display-character
-
-:noname ( args -- none )
- 2dup 1 ensure-arg-count
- car
-
- display
-
- none
-; make-primitive display
-
-:noname ( args -- none )
- 0 ensure-arg-count
-
- cr
-
- none
-; make-primitive newline