lobo/wl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

reimplementation (oupsi)

Browse source
This commit is contained in:
Lobo 2026-01-10 10:03:31 -03:00
parent 0572264f76
commit 1aec6085d9
27 changed files with 1213 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

16
old/util.c Normal file
View file

@ -0,0 +1,16 @@
#include "wscm.h"
O listreverse(O list) {
O prev = NIL;
O curr = list;
O next;
while (curr != NIL) {
C *c = uncons(curr);
next = c->cdr;
c->cdr = prev;
prev = curr;
curr = next;
}
return prev;
}