[REBOL/IT] Re: Bug in Debase di Rebol 1.2.1.x.x
- From: Gabriele Santilli <g.santilli@xxxxxxxxxxxxx>
- To: Francesco De Napoli <rebol-it@xxxxxxxxxxxxx>
- Date: Sun, 16 Nov 2003 11:10:53 +0100
Ciao Francesco,
domenica 16 novembre 2003, alle 10.07.43, hai scritto:
FDN> Come posso aggirarlo? C'è già pronto del codice Rebol per fare e disfare la
FDN> codifica fatta da Debase/Enbase?
http://www.codeconscious.com/rebsite/rebol-library/patches.r
debase: function [
{Converts a string from a different base representation to binary.
Note: This is a patched version.}
value [any-string!] "The string to convert"
/base {Allow a selection of a different base for conversion}
base-value [integer!] "The base to convert from: 64, 16, or 2"
] [tmp] [
if not base [base-value: system/options/binary-base]
if not found? find [64 16 2] base-value [return none]
tmp: either string? value [copy value] [to-string value]
RETURN first load/all append insert tmp compose [(base-value) "#{"] "}"
]
A presto,
Gabriele.
--
Gabriele Santilli <g.santilli@xxxxxxxxxxxxx> -- REBOL Programmer
Amiga Group Italia sez. L'Aquila --- SOON: http://www.rebol.it/
--
Lista REBOL/IT
Comandi: rebol-it-request@xxxxxxxxxxxxx
(inviare HELP per un aiuto)
Archivio: //www.freelists.org/archives/rebol-it/
Other related posts:
