Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
12
Task/URL-encoding/Oberon-2/url-encoding.oberon-2
Normal file
12
Task/URL-encoding/Oberon-2/url-encoding.oberon-2
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
MODULE URLEncoding;
|
||||
IMPORT
|
||||
Out := NPCT:Console,
|
||||
ADT:StringBuffer,
|
||||
URI := URI:String;
|
||||
VAR
|
||||
encodedUrl: StringBuffer.StringBuffer;
|
||||
BEGIN
|
||||
encodedUrl := NEW(StringBuffer.StringBuffer,512);
|
||||
URI.AppendEscaped("http://foo bar/","",encodedUrl);
|
||||
Out.String(encodedUrl.ToString());Out.Ln
|
||||
END URLEncoding.
|
||||
Loading…
Add table
Add a link
Reference in a new issue