@@ -56,3 +56,4 @@ lfr6.s
lfr8.s
retarea.s
blm.s
+return.s
@@ -0,0 +1,17 @@
+.define .sdret, .dsret, .sret, .dret, .cret
+.sect .text
+
+.dsret:
+ pop di
+.sret:
+ pop si
+.cret:
+ mov sp,bp
+ pop bp
+ ret
+.sdret:
+.dret:
+ jmp .cret