Re: text.e bugs?
- Posted by cargoan Jan 12, 2015
- 2217 views
Check passes for me.??? (Arch Linux 64)
[cargoan@HP-s3733es ~]$ eui -v
Euphoria Interpreter v4.1.0 development
64-bit Linux, Using System Memory
Revision Date: 2014-10-01 13:26:40, Id: 6258:f0054b3a8f8b
[cargoan@HP-s3733es ~]$ cd Fuentes/mercurial/euphoria/
[cargoan@HP-s3733es euphoria]$ hg pull
pulling from http://scm.openeuphoria.org/hg/euphoria
searching for changes
no changes found
[cargoan@HP-s3733es euphoria]$ hg id
f0054b3a8f8b (struct)
[cargoan@HP-s3733es euphoria]$ hg update default
48 files updated, 0 files merged, 7 files removed, 0 files unresolved
[cargoan@HP-s3733es euphoria]$ cp include/std/text.e "$EUINC/std/text.e"
[cargoan@HP-s3733es euphoria]$ cd "$EUINC/std/"
[cargoan@HP-s3733es std]$ diff -u text.e text.e.new > changes
[cargoan@HP-s3733es std]$ patch < changes
patching file text.e
[cargoan@HP-s3733es std]$ eutest "$EUDIR/tests/t_text.e"
interpreting /home/cargoan/euphoria-LINUX-4.1.0/tests/t_text.e:
Test results summary:
Files (run: 1) (failed: 0) (100% success)
[cargoan@HP-s3733es std]$ cat changes
--- text.e 2015-01-12 10:27:00.977966000 +0100
+++ text.e.new 2015-01-12 10:18:10.010966000 +0100
@@ -1892,12 +1892,11 @@
if pos > decs then
argtext = argtext[ 1 .. $ - pos + decs ]
elsif pos < decs then
- argtext = argtext[ 1 .. $ - pflag ] & repeat('0', decs - pos)
- --if pflag then
- --argtext = argtext[ 1 .. $ - 1 ] & '.' & repeat('0', decs - pos) & ')'
- --else
- --argtext = argtext & '.' & repeat('0', decs - pos)
- --end if
+ if pflag then
+ argtext = argtext[ 1 .. $ - 1 ] & repeat('0', decs - pos) & ')'
+ else
+ argtext = argtext & repeat('0', decs - pos)
+ end if
end if
end if
elsif decs > 0 then
[cargoan@HP-s3733es std]$
???????...
