in Drracket, I'm trying to debug this scrap of code #lang <https://docs.racket-lang.org/guide/Module_Syntax.html#%28part._hash-lang%29> racket <https://docs.racket-lang.org/reference/index.html>
(require <https://docs.racket-lang.org/reference/require.html#%28form._%28%28lib._racket%2Fprivate%2Fbase..rkt%29._require%29%29> racket/string sxml) (define <https://docs.racket-lang.org/reference/define.html#%28form._%28%28lib._racket%2Fprivate%2Fbase..rkt%29._define%29%29> (remove-markup xml-port) (let* <https://docs.racket-lang.org/reference/let.html#%28form._%28%28lib._racket%2Fprivate%2Fletstx-scheme..rkt%29._let%2A%29%29> ((parser (ssax:make-parser <https://docs.racket-lang.org/sxml/ssax.html#%28form._%28%28lib._sxml%2Fmain..rkt%29._ssax~3amake-parser%29%29> NEW-LEVEL-SEED remove-markup-nls FINISH-ELEMENT remove-markup-fe CHAR-DATA-HANDLER remove-markup-cdh)) (strings (parser xml-port null <https://docs.racket-lang.org/reference/pairs.html#%28def._%28%28quote._~23~25kernel%29._null%29%29> ))) (string-join (reverse <https://docs.racket-lang.org/reference/pairs.html#%28def._%28%28lib._racket%2Fprivate%2Flist..rkt%29._reverse%29%29> strings) ""))) (define <https://docs.racket-lang.org/reference/define.html#%28form._%28%28lib._racket%2Fprivate%2Fbase..rkt%29._define%29%29> (remove-markup-nls gi attributes namespaces expected-content seed) seed) (define <https://docs.racket-lang.org/reference/define.html#%28form._%28%28lib._racket%2Fprivate%2Fbase..rkt%29._define%29%29> (remove-markup-fe gi attributes namespaces parent-seed seed) seed) (define <https://docs.racket-lang.org/reference/define.html#%28form._%28%28lib._racket%2Fprivate%2Fbase..rkt%29._define%29%29> (remove-markup-cdh string-1 string-2 seed) (let <https://docs.racket-lang.org/reference/let.html#%28form._%28%28lib._racket%2Fprivate%2Fletstx-scheme..rkt%29._let%29%29> ((seed (cons <https://docs.racket-lang.org/reference/pairs.html#%28def._%28%28quote._~23~25kernel%29._cons%29%29> string-1 seed))) (if <https://docs.racket-lang.org/reference/if.html#%28form._%28%28quote._~23~25kernel%29._if%29%29> (non-empty-string? string-2) (cons <https://docs.racket-lang.org/reference/pairs.html#%28def._%28%28quote._~23~25kernel%29._cons%29%29> string-2 seed) seed))) (remove-markup (open-input-string <https://docs.racket-lang.org/reference/stringport.html#%28def._%28%28quote._~23~25kernel%29._open-input-string%29%29> "<foo>Hell<bar>o, world!</bar></foo>")) it's an example copied from here https://docs.racket-lang.org/sxml/ssax.html Reading here https://docs.racket-lang.org/drracket/debugger.html I understand that a little green triangular arrow should appear on the left side of the line where the debugger stops and waits but that doesn't happen to me, it runs completely and produces the output (he "Hello World !" string) am I doing anything wrong ? Thanks -- You received this message because you are subscribed to the Google Groups "Racket Users" group. To unsubscribe from this group and stop receiving emails from it, send an email to racket-users+unsubscr...@googlegroups.com. To view this discussion on the web visit https://groups.google.com/d/msgid/racket-users/CAJ98PDxXRHuH47tUBSUe1PLeywAY0fRN1Y4w6kn8mubLUt0HWw%40mail.gmail.com.
