Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!mips!news.cs.indiana.edu!msi.umn.edu!noc.MR.NET!gacvx2.gac.edu!hhdist From: postmaster.DUNG_BEETLE@gateway.qm.apple.com (postmaster) Newsgroups: comp.sys.handhelds Subject: Steve Winters :Unknown QM u Message-ID: <9101040831.AA16839@internal.apple.com> Date: 4 Jan 91 08:35:43 GMT Lines: 76 To: handhelds@gac.edu Return-path: To: handhelds@gac.edu Mail*Link#170# Steve Winters :Unknown QM u Received: by gateway.qm.apple.com; 4 Jan 91 00:35:37 Received: from apple.com by goofy.apple.com with SMTP (5.61/25-eef) id AA16752; Fri, 4 Jan 91 00:31:09 -0800 for Steve_Winters.PERIPH_PROJ@gateway.qm.apple.com Received: from gacvx2.gac.edu by apple.com with SMTP (5.61/25-eef) id AA15850; Sun, 23 Dec 90 10:31:44 -0800 for Steve_Winters.PERIPH_PROJ@gateway.qm.apple.com Date: Sun, 23 Dec 1990 10:32 CST From: handhelds@gac.edu Subject: upload test (ASC\-> unthreaded) Sender: NEWSMGR@gacvx2.gac.edu To: HANDHELDS@gacvx2.gac.edu Errors-To: postmaster@gac.edu Reply-To: handhelds@gac.edu Message-Id: X-Vms-To: IN%"HANDHELDS@GACVX2.GAC.EDU" Comments: Forwarded from COMP.SYS.HANDHELDS by GACVX2.GAC.EDU Relay-Version: VMS News - V6.0-1 14/11/90 VAX/VMS V5.4; site gacvx2.gac.edu Path: gacvx2.gac.edu!noc.MR.NET!uc!tut.cis.ohio-state.edu!zaphod.mps.ohio-state.edu! casbah.acns.nwu.edu!ucsd!mvb.saic.com!ncr-sd!sdd.hp.com!hp-pcd!hpcvra.cv.hp.com!rnews!hpcvbbs!akcs.dnickel Newsgroups: comp.sys.handhelds Subject: upload test (ASC\-> unthreaded) Message-ID: <277440fd:1502comp.sys.handhelds@hpcvbbs.UUCP> From: akcs.dnickel@hpcvbbs.UUCP (Derek Scott Nickel) Date: 23 Dec 90 05:40:07 GMT Lines: 46 well, now that I've said that its to hard to upload to this conf, I though that I should try again. If all goes well, the rest of this note will contain an unthreaded ASC\->... Derek S. Nickel ASC\-> 80000: 02D9D ! Program 80005: 1592D ; Set last RPL token to <0h> and verify DEPTH >= 1 8000A: 18FB2 ; Check arguments for type 8000F: 0400D ; <3h> 80014: 02D9D ! Program 80019: [...] ! # 0000h 80027: 06657 ; Internal NEWOB 8002C: 62747 ; Internal SWAP and DUP 80031 60F9B ; drop level two object 80077: [...] ! "Invalid String" 8009D: 1A339 ; DOERR (XLIB 2 42) 800A2: 0312B ! End Marker 800A7: 03DE0 ; Internal - (2:System Binary,1:System Binary) 800AC: 055DF ; "" 800B1: 032C2 ; Internal OVER 800B6: 61C1C ; allocate nibbles (2:sized object,1:System Binary) 800BB: 03223 ; Internal SWAP ; ***D8 B=A A ; B.A = size-1 800E6: 143 A=DAT1 A ; A.A = adr of alloc str 800E9: 130 D0=A ; D0 = adr of alloc str 800EC: 169 D0=D0+ 10 ; D0 = adr of new object (alloc str data) 800EF: 132 AD0EX ; A.A = adr of new object 800F2: 130 D0=A ; ... 800F5: 141 DAT1=A A ; adjust stack to new object 800F8: 174 D1=D1+ 5 ; A = adr of orig 03188 ; Internal DUP 80179: 05944 ; Internal BYTES (non-ROM objects) -> (2:System Binary,1:Binary Integer) 8017E: 60F9B ; drop level two object 80183: 60FBB ; Internal 4 ROLL 80188: 63CFE ; if SAME, then do next/return, else skip next 8018D: 60F9B ; drop level two object 80192: 03244 ; Internal DROP 80197: [...] ! "Invalid String" 801BD: 1A339 ; DOERR (XLIB 2 42) 801C2: 0312B ! End Marker 801C7: 0312B ! End Marker