From bd9733926076885e3417b74de76e4c9c7bc56254 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:28 -0800 Subject: Import Upstream version 2c7 --- mklibcat.scm | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) (limited to 'mklibcat.scm') diff --git a/mklibcat.scm b/mklibcat.scm index dbc26d9..d6bd380 100644 --- a/mklibcat.scm +++ b/mklibcat.scm @@ -42,7 +42,7 @@ (cons (car p) (if (pair? (cdr p)) - (cons + (cons (cadr p) (in-vicinity (library-vicinity) (cddr p))) (in-vicinity (library-vicinity) (cdr p)))))) @@ -56,7 +56,7 @@ (with-file . "withfile") (dynamic-wind . "dynwind") (dynamic . "dynamic") - (fluid-let macro . "fluidlet") + (fluid-let defmacro . "fluidlet") (alist . "alist") (hash . "hash") (sierpinski . "sierpinski") @@ -66,8 +66,8 @@ (random . "random") (random-inexact . "randinex") (modular . "modular") - (primes . "primes") (factor . "factor") + (primes . factor) (charplot . "charplot") (sort . "sort") (tsort . topological-sort) @@ -100,7 +100,8 @@ (syntactic-closures . "scmacro") (macros-that-work . "macwork") (macro . macro-by-example) - (yasos macro . "yasos") + (object . "object") + (yasos macro . "yasyn") (oop . yasos) (collect macro . "collect") (struct defmacro . "struct") @@ -128,6 +129,7 @@ (glob . "glob") (filename . glob) (make-crc . "makcrc") + (fft . "fft") (wt-tree . "wttree") (string-search . "strsrch") (root . "root") @@ -139,6 +141,7 @@ (byte . "byte") (tzfile . "tzfile") (schmooz . "schmooz") + (net-clients . "nclients") (new-catalog . "mklibcat") )))) (display " " op) -- cgit v1.2.3