1 " ******************************************************
2 " * *
3 " * *
4 " * Copyright c 1972 by Massachusetts Institute of *
5 " * Technology and Honeywell Information Systems, Inc. *
6 " * *
7 " * *
8 " ******************************************************
9
10 " ******************************************************
11 " * *
12 " * *
13 " * Copyright, C Honeywell Information Systems *
14 " * Inc., 1980. *
15 " * *
16 " * *
17 " ******************************************************
18
19
20 name mvnoosb
21 entry mvnoosb
22 mvnoosb:
23 push
24 eppab ap|2,* "get ptr to temp seg
25 eppab ab|0,*
26 mvn ,pr
27 desc9ns foo,20
28 desc9ns ab|2046,20
29 return
30 foo: aci "12345678901234567890"
31 end