scheme - a strange error in racket "no expression after a sequence of internal definitions" -

-

i have following code:

(define (play-loop strat0 strat1 strat2 game-limit)  (define (play-loop-iter strat0 strat1 strat2 count history0 history1 history2 limit)   (cond ((= count limit) (print-out-results history0 history1 history2 limit))       (else (let ((result0 (strat0 history0 history1 history2))                   (result1 (strat1 history0 history1 history2)                   (result2 (strat2 history0 history1 history2)))               (play-loop-iter strat0 strat1 strat2 (+ 1 count)                               (extend-history result0 history0)                               (extend-history result1 history1)                               (extend-history result2 history2)                               limit)))))  (play-loop-iter strat0 strat1 strat2 0 '() '() '() game-limit)))

when run in racket gives me following error:

begin (possibly implicit): no expression after sequence of internal definitions in:...

i seems ok there error , looked me interesting.

what problem?

thank you...

it's telling play-loop function contains definition of play-loop-iter function , no other expression in body.

it looks want call play-loop-iter part of play-loop's body, it's not - it's part of play-loop-iter's body. check parentheses.


Comments

Post a Comment

Popular posts from this blog

Perl - how to grep a block of text from a file -

-
it can in xml or text format. how in general grep block of text in perl? <track type="ws"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>0</locationindex> <propertyindex>0</propertyindex> </range> </track> <track type="ps" id="1"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>1</locationindex> <propertyindex>1</propertyindex> </range> </track> i want grep type="ps" , till </range> . one solution open file, read line line , match block. open(fh, "file.txt"); foreach $line (<fh>) { if ($line =~ m/type="cc"(.*?)<\/range>/) { print $1; } } but there more optimal solution without reading file line l
Read more

delphi - How to remove all the grips on a coolbar if I have several coolbands? -

-
Image
if set mycoolbar.fixedorder true,only grip on first band hidden. well,if use delphi 7 create vcl forms application,then put coolbar on , create 3 coolbans hold other controls,only grip , top coolbands can hidden setting mycoolbar.fixedorder:=true. i've uploaded picture make things clear. you got fixedorder property wrong. fixed property not allow bands rearranged if set true . setting property of coolbar true keep user changing bands order @ runtime, user can still move , resize bands. can give advice can do, actual solution problem, well, have wait answer. my advice use 3 coolbars in row , setting "fixedorder" property true , bandborderstyle bsnone . way grip hidden on of them. about property, it's not bug of ide, actual preference of property.
Read more

javascript - Animating array of divs; only the final element is modified -

-
this baffling me @ moment. i'm experienced programmer looking throw bit of surprise fiancee on countdown page our wedding. desired effect simulated confetti falling behind main page. setup follows: i have array of divs in javascript. each div absolutely positioned on page. have interval set updates every 50 or milliseconds. on each tick, run loop on array of divs, , calculations , update positions. problem problem having, however, though can see divs created, stored array, , modified (in case, each has slight randomized rotation) during initialization phase, once tick update position starts, div stored in whatever last slot of array gets position updated. tried hard-coding each div index testing purposes, strictly last element update position. upon printing current "left" , "top" style values each div before , after calculations shows value has been changed, no visible change noticeable. here's basic code: javascript var container;
Read more