<html>
<head>
<style>
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Verdana
}
</style>
</head>
<body class='hmmessage'>
Yes.<BR><BR> <BR>
<HR id=stopSpelling>
From: hosking@cs.purdue.edu<BR>To: jay.krell@cornell.edu<BR>Date: Thu, 26 Feb 2009 10:07:35 +1100<BR>CC: m3devel@elegosoft.com<BR>Subject: Re: [M3devel] scan_float<BR><BR>
<DIV><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate">
<DIV style="WORD-WRAP: break-word"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate"><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate">
<DIV>I think you wrote the most recent version of that code.  Can you take a look?</DIV></SPAN></SPAN></SPAN></SPAN></SPAN></SPAN></SPAN></SPAN></DIV></SPAN></DIV><BR>
<DIV>
<DIV>On 26 Feb 2009, at 04:30, Jay wrote:</DIV><BR class=EC_Apple-interchange-newline>
<BLOCKQUOTE><SPAN class=EC_Apple-style-span style="WORD-SPACING: 0px; FONT: 12px Helvetica; TEXT-TRANSFORM: none; COLOR: rgb(0,0,0); TEXT-INDENT: 0px; WHITE-SPACE: normal; LETTER-SPACING: normal; BORDER-COLLAPSE: separate">
<DIV class=EC_hmmessage style="FONT-SIZE: 10pt; FONT-FAMILY: Verdana">Hm, scan_float is probably wrong, when crossing that changes endianness.<BR>PA is big endian.<BR>Crossing from little endian Cygwin, in TimePosix.ms I have:<BR> <BR>L$C0003:<BR> .word 0<BR> .word 1093567616<BR><BR>TimePosix__FromUtime<BR> .PROC<BR> .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3<BR> .ENTRY<BR> copy %r3,%r1<BR> copy %r30,%r3<BR> stwm %r1,64(%r30)<BR> stw %r3,-4(%r30)<BR> stw %r19,-32(%r30)<BR> stw %r26,-36(%r3)<BR>L$M0009:<BR> ldw -36(%r3),%r28<BR> fldws 0(%r28),%fr22L<BR> fcnvxf,sgl,dbl %fr22L,%fr24<BR> ldw -36(%r3),%r28<BR> ldo 4(%r28),%r28<BR> fldws 0(%r28),%fr22L<BR> fcnvxf,sgl,dbl %fr22L,%fr23<BR> addil LT'L$C0003,%r19<BR> ldw RT'L$C0003(%r1),%r28<BR> fldds 0(%r28),%fr22<BR> fdiv,dbl %fr23,%fr22,%fr22<BR> fadd,dbl %fr24,%fr22,%fr22<BR><BR> <BR>and Utime_M3 hangs.<BR> <BR> <BR>Yet it I write the equivalent C code on the target system I get:<BR> <BR> <BR>L$C0000:<BR>        .word   1093567616<BR>        .word   0<BR>        .SPACE $TEXT$<BR>        .NSUBSPA $CODE$<BR>        .align 4<BR>        .EXPORT FromUtime,ENTRY,PRIV_LEV=3,ARGW0=GR,RTNVAL=FU<BR>FromUtime:<BR>        .PROC<BR>        .CALLINFO FRAME=0,NO_CALLS<BR>        .ENTRY<BR>        fldws 4(%r26),%fr22L<BR>        fcnvxf,sgl,dbl %fr22L,%fr4<BR>        ldil LR'L$C0000,%r28<BR>        fldws 0(%r26),%fr23L<BR>        ldo RR'L$C0000(%r28),%r28<BR>        fldds 0(%r28),%fr22<BR>        fdiv,dbl %fr4,%fr22,%fr4<BR>        fcnvxf,sgl,dbl %fr23L,%fr24<BR>        bv %r0(%r2)<BR>        fadd,dbl %fr24,%fr4,%fr4<BR> <BR> <BR>I'll dig into it more later..<BR> <BR> <BR> - Jay<BR></DIV></SPAN></BLOCKQUOTE></DIV><BR></body>
</html>