Mercurial > hg > Members > kono > nitros9-code

comparison level2/modules/kernel/fldabx.asm @ 1345:1da8ab9ba433

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added consistent comments to each system call
author boisy
date Wed, 17 Sep 2003 17:26:37 +0000
parents 716c84dca8e4
children 039ddb7c8ad7
comparison
equal deleted inserted replaced
1344:dfd2e7080b4d 1345:1da8ab9ba433
1 * F$LDABX entry point 1 **************************************************
2 * System Call: F$LDABX
3 *
4 * Function: Load A from 0,X in task B
5 *
6 * Input: B = Task number
7 * X = Data pointer
8 *
9 * Output: A = Data byte at 0,x in task's address space
10 *
11 * Error: CC = C bit set; B = error code
12 *
2 FLDABX ldb R$B,u Get task # to get byte from 13 FLDABX ldb R$B,u Get task # to get byte from
3 ldx R$X,u Get offset into task's DAT image to get byte from 14 ldx R$X,u Get offset into task's DAT image to get byte from
4 *** bsr L0C40 Go get the byte into B 15 *** bsr L0C40 Go get the byte into B
5 * Load a byte from another task 16 * Load a byte from another task
6 * Entry: B=Task # 17 * Entry: B=Task #
25 *L0C09 ldu <D.TskIPt get pointer to task image table 36 *L0C09 ldu <D.TskIPt get pointer to task image table
26 * lslb multiply task # by 2 37 * lslb multiply task # by 2
27 * ldu b,u get pointer to task image (doesn't affect carry) 38 * ldu b,u get pointer to task image (doesn't affect carry)
28 * rts restore & return 39 * rts restore & return
29 40
30 * F$STABX entry point 41
42 **************************************************
43 * System Call: F$STABX
44 *
45 * Function: Store A at 0,X in task B
46 *
47 * Input: A = Data byte to store in task's address space
48 * B = Task number
49 * X = Logical address in task's address space
50 *
51 * Output: None
52 *
53 * Error: CC = C bit set; B = error code
54 *
31 FSTABX ldd R$D,u 55 FSTABX ldd R$D,u
32 ldx R$X,u 56 ldx R$X,u
33 * Store a byte in another task 57 * Store a byte in another task
34 * Entry: A=Byte to store 58 * Entry: A=Byte to store
35 * B=Task # 59 * B=Task #