[REBOL] Re: My function seems to have no effect
From: lmecir:mbox:vol:cz at: 15-Apr-2002 13:05
Hi Richard,
just use something like:
print ["toto:" get_func_name test]
----- Original Message -----
Subject: [REBOL] My function seems to have no effect
Hi Rebol fellows,
Hereafter my code :
REBOL[]
get_func_name: make function! [ chaine ] [
use [ guillemet ] [
guillemet: make string! {"}
remove/part chaine 6
foo: copy/part chaine 1 1
if foo == guillemet [ remove/part chaine 1 ]
; Supprimer les 2 derniers caractères
clear skip tail chaine -2
return (chaine)
]
]
test: copy "123456fonction rearzer r r12"
print test
print ["toto:" get_func_name [ test ]]
When I test it, I have :
>> do %get_func.r
Script: "Untitled" (none)
123456fonction rearzer r r12
toto:
and not something like this : "fonction rearzer r r"
Richard Coffre
France Telecom Orbiscom
Tél. : 01 47 61 46 28
