yuu_nkjm blog

トップ «前の日記(2015-12-15(Tue)) 最新次の日記(2016-01-19(Tue))» 月表示　　　編集設定

2015-12-25(Fri) [長年日記]

[Kawa][Scheme] defineで再定義

(define foo (lambda (bar) (string-append "foo" bar)))
(define pyo foo)
(pyo "2") ;;=> "foo2"
 
(define foo (lambda (bar) (string-append "foooooooooo" bar)))
(pyo "2") ;;=> "foo2"
;;;;;;;;;;;;;;;;;;;;;
(define (foo bar) (string-append "foo" bar))
(define pyo foo)
(pyo "2") ;;=> "foo2"
 
(define foo (lambda (bar) (string-append "foooooooooo" bar)))
(pyo "2") ;;=> "foo2"
;;;;;;;;;;;;;;;;;;;;;
(define (foo bar) (string-append "foo" bar))
(define pyo foo)
(pyo "2") ;;=> "foo2"
 
(define (foo bar) (string-append "foooooooooo" bar))
(pyo "2") ;;=> "fooooooooooooooo2"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (foo bar) (string-append "foo" bar))
(define (pyo bar) (foo bar))
(pyo "2") ;;=> "foo2"
 
(define (foo bar) (string-append "foooooooooo" bar))
(pyo "2") ;;=> "fooooooooooooooo2"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (foo bar) (string-append "foo" bar))
(define pyo
            (lambda (bar)
                (foo bar)))
(pyo "2")  ;;=> "foo2"
 
(define (foo bar) (string-append "fooooooooooooooo" bar))
(pyo "2") ;;=>  "fooooooooooooooo2"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (foo bar) (string-append "foo" bar))
(define (pyo bar) (foo bar))
(pyo "2")  ;;=> "foo2"
 
(define (foo bar) (string-append "fooooooooooooooo" bar))
(pyo "2") ;;=>  "fooooooooooooooo2"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[ツッコミを入れる]

本日のリンク元

その他のリンク元

https://www.google.co.jp/ ×1