diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2017-06-12 21:19:08 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2017-06-12 21:19:08 -0700 |
| commit | 8bdbe5bfa71c52d6ee40410f6f4f1d75e4e2ccb0 (patch) | |
| tree | b1c10d6edd39d8d1e94d0a1de44312b60b3b575c /genprotsym.txr | |
| parent | 7add4063c1ad922db078dd20d46e54e786775c0a (diff) | |
| download | txr-8bdbe5bfa71c52d6ee40410f6f4f1d75e4e2ccb0.tar.gz txr-8bdbe5bfa71c52d6ee40410f6f4f1d75e4e2ccb0.tar.bz2 txr-8bdbe5bfa71c52d6ee40410f6f4f1d75e4e2ccb0.zip | |
Sort groups by symbol in protsym.c.
* genprotsym.txr: Sort groups so that the protsym.c
deltas, going forward, are more stable.
Diffstat (limited to 'genprotsym.txr')
| -rw-r--r-- | genprotsym.txr | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/genprotsym.txr b/genprotsym.txr index fefff0cc..3ba70b3a 100644 --- a/genprotsym.txr +++ b/genprotsym.txr @@ -42,6 +42,7 @@ val @(coll)@{sym /[A-Za-z0-9_]+_[sk]/}@/[,;]/@\ @(bind pp-groups @[group-by pp-syms-of-sym sym]) @(bind gsym @[mapcar (opip sort (tuples 5)) (hash-values pp-groups)]) @(bind gpp @(hash-keys pp-groups)) +@(set (gpp gsym) @(multi-sort (list gpp gsym) [list less])) @(output "protsym.c") /* This file is generated by genprotsym.txr */ |