WebRss - Scm - s c h e m e w i k i . o r g

TWiki's Scm web http://schemecookbook.org/view/Scm The Scm web of TWiki. TWiki is a Web-Based Collaboration Platform for the Corporate World. en-us Copyright 2008, Peter Thoeny and contributing authors. Peter Thoeny [Peter@Thoeny.com] Peter Thoeny [Peter@Thoeny.com] TWiki TWiki.Scm TWiki.Scm http://schemecookbook.org/view/Scm http://schemecookbook.org/twiki/pub/TWiki/TWikiLogos/twikilogo88x31.gif WebStatistics http://schemecookbook.org/view/Scm/WebStatistics Statistics for Scm Web Month: Topic views: Topic saves: File uploads: Most popular topic views: Top contributors for topic save and uploads: Nov 2008 212 0 0 15 WebHome ... 2008-11-03T13:28:00Z guest 1.132 updated major http://schemecookbook.org/rdiff/Scm/WebStatistics http://schemecookbook.org/rdiff/Scm/WebStatistics SslUrl http://schemecookbook.org/view/Scm/SslUrl ; adapted from url.ss in net collection, but linked with ssl-tcp-unit (module ssl-url mzscheme (require (lib "unit.ss") ; for PLT versions earlier than v371, use ... 2007-09-12T02:11:00Z AntonVanStraaten 1.4 updated major http://schemecookbook.org/rdiff/Scm/SslUrl http://schemecookbook.org/rdiff/Scm/SslUrl IfItSyntaxLoc http://schemecookbook.org/view/Scm/IfItSyntaxLoc (define-syntax (if-it stx) (syntax-case stx () (src-if-it test then else) (with-syntax ( it (datum- syntax-object (syntax src-if-it) 'it) ) (syntax/loc stx (let ( ... 2007-08-24T22:38:00Z WillFarr 1.1 updated major http://schemecookbook.org/rdiff/Scm/IfItSyntaxLoc http://schemecookbook.org/rdiff/Scm/IfItSyntaxLoc ColonMatrixExpansion http://schemecookbook.org/view/Scm/ColonMatrixExpansion (:matrix x (index i j) M) (let ((m matrix) (rows #f) (cols #f)) (set! rows (matrix-rows m)) (set! cols (matrix-cols m)) (let loop ((i 0) (j 0)) (if ( j+1 cols)) (if ... 2007-08-24T18:52:00Z WillFarr 1.1 updated major http://schemecookbook.org/rdiff/Scm/ColonMatrixExpansion http://schemecookbook.org/rdiff/Scm/ColonMatrixExpansion DoExpansionSRFI42 http://schemecookbook.org/view/Scm/DoExpansionSRFI42 (:do (let ( ) ) ( ) (let ( ) ) ( )) (let ( ) (let loop ( ) (if (let ( ) payload (if (loop ) ))))) 2007-08-24T18:46:00Z WillFarr 1.1 updated major http://schemecookbook.org/rdiff/Scm/DoExpansionSRFI42 http://schemecookbook.org/rdiff/Scm/DoExpansionSRFI42 NewSRFI42Generator http://schemecookbook.org/view/Scm/NewSRFI42Generator (define-syntax :matrix (syntax-rules (index) ((:matrix cc x (index i j) mexpr) (:do cc (let ((m mexpr) (rows #f) (cols #f)) (set! rows (matrix-rows m)) (set! cols ... 2007-08-24T18:39:00Z WillFarr 1.1 updated major http://schemecookbook.org/rdiff/Scm/NewSRFI42Generator http://schemecookbook.org/rdiff/Scm/NewSRFI42Generator WebHome http://schemecookbook.org/view/Scm/WebHome Schematics Cookbook Source Code Repository This is the Scm web, where source code files for the Cookbook.WebHome Cookbook are stored. Files stored here can be included ... 2007-05-19T02:00:00Z JeffBuckley 1.6 updated major http://schemecookbook.org/rdiff/Scm/WebHome http://schemecookbook.org/rdiff/Scm/WebHome FileProcessWords http://schemecookbook.org/view/Scm/FileProcessWords begin scheme (define for-each-word (lambda (filename proc) (with-input-from-file filename (lambda () (let read-word ((char (read-char)) (word '())) (cond ((eof-object ... 2006-06-22T12:44:00Z MichaelBurschik 1.1 updated major http://schemecookbook.org/rdiff/Scm/FileProcessWords http://schemecookbook.org/rdiff/Scm/FileProcessWords DefineWordBoundary http://schemecookbook.org/view/Scm/DefineWordBoundary begin scheme (define word-boundary? (lambda (character) (if (list? (memq character '(#\space # ab #\newline))) #t #f))) end 2006-06-22T12:41:00Z MichaelBurschik 1.1 updated major http://schemecookbook.org/rdiff/Scm/DefineWordBoundary http://schemecookbook.org/rdiff/Scm/DefineWordBoundary MatchByName http://schemecookbook.org/view/Scm/MatchByName ;; tested in PLT Scheme 300.3 (require (lib "plt-match.ss")) (define-struct expr (srcloc)) (define-struct (id expr) (name)) (define-struct (lam expr) (arg body)) ... 2006-01-01T19:07:00Z RichardCobbe 1.1 updated major http://schemecookbook.org/rdiff/Scm/MatchByName http://schemecookbook.org/rdiff/Scm/MatchByName ReadingLinesSample http://schemecookbook.org/view/Scm/ReadingLinesSample begin scheme (for-each-line-in-file "ReadingLines.scm" (let ((line-num 0)) (lambda (line) (printf "~a: ~a ~n" line-num line) (set! line-num (add1 line-num))))) end ... 2005-10-27T18:59:00Z GeorgeHerson 1.2 updated major http://schemecookbook.org/rdiff/Scm/ReadingLinesSample http://schemecookbook.org/rdiff/Scm/ReadingLinesSample ReadingLinesWithFoldSample http://schemecookbook.org/view/Scm/ReadingLinesWithFoldSample begin scheme (fold-lines-in-file "ReadingLinesWithFold.scm" (lambda (line line-num) (printf "~a: ~a ~n" line-num line) (add1 line-num)) 1) end 2005-10-27T18:58:00Z GeorgeHerson 1.2 updated major http://schemecookbook.org/rdiff/Scm/ReadingLinesWithFoldSample http://schemecookbook.org/rdiff/Scm/ReadingLinesWithFoldSample HashPresence http://schemecookbook.org/view/Scm/HashPresence (define hash-has-key? (let ((symbol (gensym))) (lambda (table key) (not (eq? (hash-table-get table key (lambda () symbol)) symbol))))) 2004-09-16T11:16:00Z NoelWelsh 1.3 updated major http://schemecookbook.org/rdiff/Scm/HashPresence http://schemecookbook.org/rdiff/Scm/HashPresence WebNotify http://schemecookbook.org/view/Scm/WebNotify This is a subscription service to be automatically notified by e-mail when topics change in this Scm web. This is a convenient service, so you do not have to come ... 2004-09-04T07:25:00Z AntonVanStraaten 1.3 updated major http://schemecookbook.org/rdiff/Scm/WebNotify http://schemecookbook.org/rdiff/Scm/WebNotify NumRecPassword http://schemecookbook.org/view/Scm/NumRecPassword (require (lib "14.ss" "srfi") (lib "27.ss" "srfi") (lib "42.ss" "srfi")) (define (generate-8-password) (string-append-ec (:range i 0 8) (let ((bigcs (substring (char ... 2004-06-01T20:58:00Z JensAxelSoegaard 1.2 updated major http://schemecookbook.org/rdiff/Scm/NumRecPassword http://schemecookbook.org/rdiff/Scm/NumRecPassword ReadingLinesWithFold http://schemecookbook.org/view/Scm/ReadingLinesWithFold begin scheme (define (fold-lines-in-file filename proc init . mode) (with-input-from-file filename (lambda () (apply fold-lines proc init (current-input-port) mode ... 2004-05-27T03:53:00Z AntonVanStraaten 1.2 updated major http://schemecookbook.org/rdiff/Scm/ReadingLinesWithFold http://schemecookbook.org/rdiff/Scm/ReadingLinesWithFold