pop-r ( -- obj )
Stack effect inference implementation

Prev:	pop-literal ( -- obj )
Next:	push-d ( obj -- )

Vocabulary
stack-checker.backend

Inputs
None

Outputs

obj

an object

Definition

USING: sequences stack-checker.errors stack-checker.state ;

IN: stack-checker.backend

: pop-r ( -- obj ) meta-r [ too-many-r> ] [ pop ] if-empty ;