Racket/Multitråd: Versionshistorik

Från Täpp-Anders
Hoppa till navigeringHoppa till sök

Val av diff: markera i radioknappen för att jämföra sidversioner och tryck enter eller knappen längst ner.
Förklaring: (nuvarande) = skillnad mot senaste sidversion; (föregående) = skillnad mot föregående sidversion; m = mindre ändring.

5 april 2026

  • nuvarandeföregående 12.555 april 2026 kl. 12.55 Anders diskussion bidrag 2 516 byte +2 516 Skapade sidan med '<pre>#lang racket ;;;;; ;; Multitrådad demo ;; Täpp-Anders Sikvall, anders@sikvall.se, 2006-04-04 ;; Racketkurs. ;; Simulerar tidsödande arbete genom att pausa tråden en slumpmässig tid (define (random-sleep min-sec max-sec) (sleep (+ min-sec (* (random) (- max-sec min-sec))))) ;; En arbetare körs i en egen tråd och lyssnar på work-channel (define (start-worker id work-channel result-channel) (thread (λ () (let loop () ;; Vänta på att f...'
Hämtad från ”http://wiki.sikvall.se/index.php/Racket/Multitråd”