On 4/4/2025 2:00 PM, Simon Clubley wrote:And Macro-32 can be used to work with data structures.It basically parses, validates, and executes commands it has been given.It is not obvious to me that:
That is something which can be implemented a lot more easily and concisely
in a HLL with abstracted data structure capabilities (which includes
even C) than an assembly language with no such capabilities.
(LOC/FP for Macro-32) / (LOC/FP for C)
is a lot higher for a shell than for the average application - data
structures are not anything special for shells.
But maybe.
Many have worked with FAB and RAB in Macro-32. :-)
To illustrate:
$ type ds.c
#define MAX_LEN 80
struct data
{
int v;
int slen;
char s[MAX_LEN];
};
void m(struct data * d)
{
d->v = d->v + 1;
d->s[d->slen] = 'X';
d->slen += 1;
}
$ type ds.mar
.title ds
MAX_LEN=10
V=0
SLEN=V+4
S=SLEN+4
X=88
.psect $CODE quad,pic,con,lcl,shr,exe,nowrt
.entry m,^m<>
movl 4(ap),r0
addl2 #1, V(r0)
movab S(r0), r1
addl2 SLEN(r0), r1
movb #X, (r1)
addl2 #1, SLEN(r0)
ret
.end
$ type dstest.for
program dstest
structure /data/
integer*4 v
integer*4 slen
character*80 s
end structure
record /data/buf
buf.v = 123
buf.s = 'ABC'
buf.slen = len('ABC')
call m(buf)
write(*,*) buf.v, buf.s(1:buf.slen)
end
$ for dstest
$ cc ds
$ link dstest + ds
$ run dstest
124 ABCX
$ macro ds
$ link dstest + ds
$ run dstest
124 ABCX
Arne
| Date | Sujet | # | Auteur | |
| 8 Apr 26 |  … |
Les messages affichés proviennent d'usenet.