syndicate-lang
/
racket-matrix-2012
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix type error

This commit is contained in:
Tony Garnock-Jones 2012-03-24 15:59:15 -04:00
parent 8154ecbc0e
commit c278e10673
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
os2.rkt
View File

@ -126,7 +126,7 @@
(vm (hash) (vm (hash)
(hash) (hash)
0 0
(list->quasi-queue (list (spawn boot #f))))) (list->quasi-queue (list (cons -1 (spawn boot #f))))))
(define (run-vm state) (define (run-vm state)
(let loop ((remaining-actions (quasi-queue->list (vm-pending-actions state))) (let loop ((remaining-actions (quasi-queue->list (vm-pending-actions state)))