LINUX.ORG.RU

История изменений

Исправление loz, (текущая версия) :

Хе-хе, в том то и все дело, реально порядок такой:

replace/all (copy body) 'y [reverse y] 

а контекст такой:

proto: [x [integer!] y [string!]]

body: [
    print x
    print y
]

;-- alternate expression of a function equivalent to foo
foo-alternate: function proto
    body

bar: function proto
    replace/all copy body 'y [reverse y]

в функции bar все вхождения y в копии body заменятся на [reverse y], ну и строка - второй аргумент будет напечатана задом наперед при вызове.

Исправление loz, :

Хе-хе, в том то и все дело, реально порядок такой:

replace/all (copy body) 'y [reverse y] 

а контекст такой:

proto: [x [integer!] y [string!]]

body: [
    print x
    print y
]

;-- alternate expression of a function equivalent to foo
foo-alternate: function proto
    body

bar: function proto
    replace/all copy body 'y [reverse y]

в функции bar все вхождения y в body заменятся на [reverse y], ну и строка - второй аргумент будет напечатана задом наперед при вызове.

Исходная версия loz, :

Хе-хе, в том то и все дело, реально порядок такой:

replace/all (copy body) 'y [reverse y] 

а контекст такой:

proto: [x [integer!] y [string!]]

body: [
    print x
    print y
]

;-- alternate expression of a function equivalent to foo
foo-alternate: function proto
    body

bar: function proto
    replace/all copy body 'y [reverse y]

в функции bar все вхождения y заменятся на [reverse y], ну и строка - второй аргумент будет напечатана задом наперед при вызове.