Fixing everything for mandatory stack effects

[factor.git] / extra / asn1 / asn1.factor

diff --git a/extra/asn1/asn1.factor b/extra/asn1/asn1.factor
index 50102d19292973af4a694e1a2e5b727c5486a1cd..7b46aa87de6612be9c51e1f490294d07c4e35d02 100644 (file)
--- a/extra/asn1/asn1.factor
+++ b/extra/asn1/asn1.factor
@@ -48,7 +48,7 @@ SYMBOL: elements
 
 TUPLE: element syntax id tag tagclass encoding contentlength newobj objtype ;
 
-: <element> element new ;
+: <element> ( -- element ) element new ;
 
 : set-id ( -- boolean )
     read1 dup elements get set-element-id ;