| Commit message (Collapse) | Author | Age |
|---|
| |
|
|
|
| |
Each value in the return of group-by must have exactly two values, so
cons pairs (instead of lists) is much better.
|
| |
|
|
|
| |
Changed the signature of `path-append` to require at least one argument.
The alternative would have been that no components expands into '.'.
|
| | |
|
| | |
|
| | |
|
| | |
|
| | |
|
| |
|
|
|
|
|
|
|
|
|
|
| |
Texinfo was a bad match for how TypeScript is structured. This also
allows generation of jsdoc pages, which can be nice.
Another large win is that this opens up for the texinfo pages to replace
the Guile heading with different subheadings, including
- external library
- internal library
- C library
- ...
|
| | |
|
| | |
|
| | |
|
| | |
|
| | |
|
| |
|
|
| |
It has its uses, but like others, its extra weight.
|
| |
|
|
|
| |
Procedures where overly specific, and doing it manually was almost no
more work.
|
| | |
|
| |
|
|
|
|
| |
->str as an alias of ->string is removed. ->string is however left.
->quoted-string was always weird, and was only used once.
|
| | |
|
| | |
|
| |
|
|
|
|
| |
While it was nice, the most important part was the multi-valued let from
srfi-71 (which is implemented in srfi-71)). The minor pattern matching
structures could often be replaced with car+cdr, or a propper match.
|
| | |
|
| | |
|
| | |
|
| | |
|
| | |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
While not necessary, since we barely use UUID:s, it's still WAY faster,
and nice to not depend on the system providing `uuidgen'.
For comparison, number of UUID:s generated by different settups in 1
second:
65.000 :: guile native
700 :: guile shell-out
3.500.000 :: c native
100.000 :: libuuid - guile bindings
650.000 :: libuuid
Tests where run with either
(call-with-time-limit
1
(lambda ()
(let loop ()
(uuid)
(set! count (1+ count))
(loop)))
(lambda _ (display count)))
or
volatile unsigned long long count = 0;
sigaction(SIGALARM, ...);
alarm(1);
for (;;) {
uuid();
count++;
}
(let ((count 0))
(call-with-time-limit
1
(lambda ()
(let loop ()
((@ (hnh util) uuidgen))
(set! count (1+ count))
(loop)))
(lambda _ (format #t "exec count = ~:d~%" count))))
|
| | |
|
| | |
|
| | |
|
| | |
|
| |
|
|
|
| |
It was only used in one module, and provided litle clarity over a simple
set of define statementns.
|
| |
|
|
|
| |
This is the first (major) step in splitting the generally useful items
into its own library.
|
| |
|
|
|
|
| |
Primarly this moves all vcompenent input and output code to clearly
labeled modules, instead of being spread out. At the same time it also
removes a handfull of unused procedures.
|
| |
|
