scheme - Replace first occurrence of symbol in (possibly nested) list -

-

i replace first occurrence of symbol (say '-) symbol (say '+) inside list may contain lists. say,

'(((-))) turn '(((+)))

'((-) - b) '((+) - b)

here's another, different option: using mutable state find out when first replace has happened:

(define (replace-first)   (let ((found #f))     (define (replacer exp old new)       (cond ((null? exp) '())             ((not (pair? exp))              (cond ((and (eq? exp old) (not found))                     (set! found #t) new)                    (else exp)))             (else              (cons (replacer (car exp) old new)                    (replacer (cdr exp) old new)))))     replacer))  ((replace-first) '(((-))) '- '+) => '(((+)))  ((replace-first) '((-) - b) '- '+) => '((+) - b)  ((replace-first) '(+ 1 2) '+ '-) => '(- 1 2)  ((replace-first) '((+) 1 2) '+ '-) => '((-) 1 2)  ((replace-first) '(1 2 ((+)) 3 4) '+ '-) => '(1 2 ((-)) 3 4)  ((replace-first) '() '+ '-) => '()  ((replace-first) '(1 2 ((((((+ 3 (+ 4 5)))))))) '+ '-) => '(1 2 ((((((- 3 (+ 4 5))))))))

Comments

Post a Comment

Popular posts from this blog

java - Jmockit String final length method mocking Issue -

-
using jmockit 1.2 jar, trying mock string's length method getting unexpected invocation exception: failed: test java.lang.illegalstateexception: missing invocation mocked type @ point; please make sure such invocations appear after declaration of suitable mock field or parameter @ stringdemo.testa$1.<init>(testa.java:17) @ stringdemo.testa.test(testa.java:13) i using testng: @test public void test() throws exception { new expectations() { @mocked("length") string astring; { astring.length(); result = 2; } }; system.out.println(a.showa("test")); } } actual class a: public class { public static int showa(string str){ int a= str.length(); return a; } } this wrong way of recording expected results. shouldn't mock , record string's length() method, record showa() instead. here solution @suppresswarnings("unused&qu
Read more

asp.net - Razor Page Hosted on IIS 6 Fails Every Morning -

-
i have simple page in intranet uses razor/asp fetch single record table , display it, plus few graphic, dashboard display. meaning, no user intervention other first time open ie internal url. the problem having every morning ie displays "page not found or network error" message. refresh page, , it's stuck , doesn't display anything. try different pc, open ie internal url , it's stuck... ...until following: login server hosting page run inetmgr go web sites, etc right click on page that's giving me problem , select browse at moment, error message: server error in '/' application. -------------------------------------------------------------------------------- type of page not served. description: type of page have requested not served because has been explicitly forbidden. extension '.cshtml' may incorrect. please review url below , make sure spelled correctly. requested url: /application/dashboard.cshtml ---------------
Read more

c++ - wxwidget compiling on windows command prompt -

-
can please guide me on method,as how compile wxwidget using windows command prompt or msys. [i can't seem find on wxwiki/wxwidget official book/anywhere else] i have compiled wxwidget instructions have provided (using msys). from searching on internet seems 1 can (maybe?) through use of makefile (is correct?) if yes: directory & how should link wx libraries in makefile if no: way besides makefile? i know can use ide's code::block , make life simpler prefer compile using command prompt/msys. thanks in advance.
Read more