RE: LONG, LONG math - aka 64bit math....

In answer to your original question about when they came in OS/400, the C++
support brought them in to play. We, as end users, got 'legal' access them
using VisualAge C++ for OS/400.

-----Original Message----- 
From: Don 
Sent: Wed 7/4/2001 10:53 AM 
To: MI400@midrange.com 
Cc: 
Subject: Re: LONG, LONG math - aka 64bit math....





Agreed that this is the MI list and the concern arose from a crypto 
routine written in C and ported to the 400...but the question still stands 
and also, it would be interesting as to how far down this implementation 
actually went in the MI vs simulating 64 bit math with 32bit op codes..:) 

Thanks Leif.... 


DOn 




On Wed, 4 Jul 2001, Leif Svalgaard wrote: 

> From: Don <dr2@cssas400.com> 
> > Dumb question: 
> > 
> > I told that in effect we didn't have 64bit math ops on this machine
until 
> > v4r5/v5r1.  This is to say that "long long" variables didn't exist until

> > they finally wokeup and got serious about terabyte space and gave us
64bit 
> > math....   
> > 
> > Can anyone confirm this for me? 
> 
> dumb answer: 
> MI only had BIN(2) and BIN(4) (i.e. 16-bit and 32-bit) binary variables 
> at least through v4r5; don't know about v5R1, but I doubt it. 
> Packed and zoned variables go to 31 digits (much beyond 64-bit). 
> Float has always had FLT(4) (32-bit) and FLT(8) (64-bit), but 
> since floats are IEEE standard, that's no news. 
> Other languages may vary. 
> But this is the MI list, right? 
> 
> 
> +--- 
> | This is the MI Programmers Mailing List! 
> | To submit a new message, send your mail to MI400@midrange.com. 
> | To subscribe to this list send email to MI400-SUB@midrange.com. 
> | To unsubscribe from this list send email to MI400-UNSUB@midrange.com. 
> | Questions should be directed to the list owner/operator:
dr2@cssas400.com 
> +--- 
> 

+--- 
| This is the MI Programmers Mailing List! 
| To submit a new message, send your mail to MI400@midrange.com. 
| To subscribe to this list send email to MI400-SUB@midrange.com. 
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com. 
| Questions should be directed to the list owner/operator: dr2@cssas400.com 
+--- 


begin 600 winmail.dat
M>)\^(BH``0:0"``$```````!``$``0>0!@`(````Y`0```````#H``$%@`,`
M#@```-$'!P`$`!,`'``G``,`/`$!"8`!`"$````S.40P,$8Q-$,V0D(Y,#0V
M.4$S031$1$$Q044P.39!-@!#!P$@@`,`#@```-$'!P`$`!,`'``I``,`/@$!
M#8`$``(````"``(``0.0!@`\%@``.@```$``.0".XC)PZ03!`1\`,4`!````
M#````%``2`!!`$P`3`````,`&D``````'P`P0`$````,````4`!(`$$`3`!,
M`````P`90``````?`$D``0```%(```!2`&4`.@`@`$P`3P!.`$<`+``@`$P`
M3P!.`$<`(`!M`&$`=`!H`"``+0`@`&$`:P!A`"``-@`T`&(`:0!T`"``;0!A
M`'0`:``N`"X`+@`N``````!``$X``%:/9J$$P0$"`5L``0```#(`````````
M@2L?I+ZC$!F=;@#=`0]4`@````!$;VX`4TU44`!D<C)`8W-S87,T,#`N8V]M
M````'P!F``$````*````4P!-`%0`4```````'P!G``$````B````9`!R`#(`
M0`!C`',`<P!A`',`-``P`#``+@!C`&\`;0``````'P!:``$````(````1`!O
M`&X````?`#)``0```"(```!D`'(`,@!``&,`<P!S`&$`<P`T`#``,``N`&,`
M;P!M```````"`5P``0```!8```!33510.D12,D!#4U-!4S0P,"Y#3TT````#
M`!U```````(!7@`!````,@````````"!*Q^DOJ,0&9UN`-T!#U0"`````$1O
M;@!33510`&1R,D!C<W-A<S0P,"YC;VT````?`&@``0````H```!3`$T`5`!0
M```````?`&D``0```"(```!D`'(`,@!``&,`<P!S`&$`<P`T`#``,``N`&,`
M;P!M```````?`%T``0````@```!$`&\`;@```!\`,T`!````(@```&0`<@`R
M`$``8P!S`',`80!S`#0`,``P`"X`8P!O`&T```````(!7P`!````%@```%--
M5%`Z1%(R0$-34T%3-#`P+D-/30````,`'D```````@%Q``$````;`````<$$
MH[45<_@:!W"0$=6FPP"@R>'Z;P`14`8(`!\`=``!````)@```$T`20`T`#``
M,`!``&T`:0!D`'(`80!N`&<`90`N`&,`;P!M```````"`0D0`0```!(.```.
M#@``6#H``$Q:1G5841`:`P`*`')C<&<Q,C6",@-#:'1M;#$#,#\!`P'W"H`"
MI`/C`@!C:,$*P'-E=#`@!Q,"@/\0`P!0!%8(50>R$=4.40,!W1#7,@8`!L,1
MU3,$1A#9;Q+K$>,([PGW.QC/#C`U.Q'2#&!C`%`+"0%D,S:3$6`+I30@$`(J
M7`ZRO0&09Q3P"J,1XQWH-!3P`#PA1$]#5%E0`$4@2%1-3"!0`%5"3$E#("(M
M("\O5S-#(8!$5")$()0S+C(A@$5.G"(^'NT>CR/!,3@?\&\@HB,/)!\FD#,=
M@"5P17Q!1"7-#O$F[REO)/0V00[P/$U%5$$'L$$Q+&`](D<)\`20871%!;`B
M$M!/3E0BT%03+/`%X45X$/%N9V4]!E)V$S$O00"0`B`@-B`N,"XT-"5`+C-.
M,R+^*L\E`S<W'_!4<$E43$4ESC!0!_!E2#H@3"W01RPU`R`!`,!T:"`M(&%K
M8F$O\#1B:05`-<(NZS<1)&XU'_`O,U\QCR9%7S2A.'`H3R:?/$0U$6`\`$)/
M1%D@9&ER^CT\8'([L#PC`"$#,#[!G&1O`.`^P0JQ7'$8L/\^P1#P`S`_)1%@
M.]L<\3S?B&<Y-A_P1$E6/OF_``!!-SOY-G!$;T&"20.@30!Q=Q,Q+7`@>0AA
M()D%L&EG"X`'0"!Q"E`\<W0OP@&@"&`%0'=HAPGP2&!*@'D@8V$'@`(@"X`@
M3U,O-##.,#502L$2T"LK'9P=@"%"M'-U<'`8<2!BV0-@=6<.L$JR;4M22'%!
M"U%Y+B!793508>,$(`GP9"!U$3`1(#50A&=O!4`G;&5G!T!2)S8@8V,'D',[
MVSC!'8`F;F)S<`*`/QC\)V$!0$$W3N-,GT+24*!1"X!G(%8$`'4'0$'?+N%,
M4@(0!<!+E"X[^0'`WS\'"J(_!PIQ)'PP*!$AX']$.UI(0;]"ST/3(1`@,$M8
M455/+?`^=B!)L'D#46`N,4%21TE.+1A224<@H#3P,'!X_R+Q/Q@*L1`"0"5`
MPT"!01__7B\?&Q%@:`!?#T0?12]&/UME)S^@:1S2)'PT)5%&TRW184!I>F&0
M,FF+"^+590DM<0)/209-4@$\@-YE<0-M;2P0/A%2/OL+@+YE"H%E+U*V/B!I
MBV)E"=I&`V$Z:$P?X2]VRET9_"!$+]%5;V;/4P%H'G./_W2?=:]VOX!X!F`"
M,'BO>;]7>L=/\%"`-TNP+P'0,*,.\%O0.C4S$7!-<J^??Q^`+X$_@D^*I51O
MA`\3A1]ZQTU)2\%`;6GV9"U0+M$N!:!53WR/?9^?B*^)OXK/B]]WC$-CC>__
MCO]ZQY1/E5^6;Y=_F(^#9?AU8FH%D(/_FQ]ZN#3?_S7MD<^2WY/D-M:<SYW?
MGN^OJL^KWZSO)-8U:2$O;I+_I"]JGEE?6F];?[(OL&\.(/^NGF.CM^^X_[H/
MNQ]F;V=_^VL)'_!0O+]L:6O?;.]M__]O#W`=5W`)T5"`->`M8$JQWP0`2U`$
M($P2D)`@Q1!)L.]'\<E2+O`%H&Y1\`2A"L#^;Q$P5^`#838@IX^_;Y/5]04`
M>04P;["?L:^<#ZWO_Z[_O=_%_\</<!U.<4G`+3#_2F`%$`)`2I%+82%`RP).
M$O_)0DB`3!+,W\WOD^188C<0WF)*04P228=)L6P#($FP_\L!4BS0C]&?TJ_3
MO]3/U=^?UN_7_Q%@RP('0'-OIA#U-J%W"&!L4(#;G]ROD^3^8DM"V>`8T$FQ
M5N%0,4AQM&AO!^!F"L$_X'=*HOW)XFT+4$\`@]$M8"_!X$__X5_B;^-_Y(_E
MG^:M"J/`L-?GG^BO`-!T5T%L2O!(,+<",$\CRE1V!"``D&WJH'_P85;AP<$V
MEDI@-J`U\#/R,C:2;W#JW^OOSN8$<?)S-Q`Z*?"_\<]ZFK1/_[55PC_V'[/4
M.&'"`;YO_Z__P(_!G\0_Q4_G#_C_C3@NL<)K4$!,96EFJE\"?_\#CP2?!:\&
MOP?/E#Z\;Q?O_PD/"A\++PP_#4\.7P]O$'_Y'*5$3_"O$^\4_Q8/%Q__'&\9
M/QI/&U\KGRW_+P\P'_\Q+S(_'.\=_Q\/(!\A+R(_?R-/)%]P2B8PAJ*F$)/P
M2KWJH""',J81$G&#L';ZT/]1@.\`4(#9H%$@I:`F7R=O_RA_*8\JGS7/++\V
MGS>O.+]_.<\ZWSOO//\^#T>?H',FZ&=T.S3(/GJI>&-[3S=3$TL@4XD\4;B1
M$#)`^F-R`7/>$I&!59]3;U'O_T*O0[_S?_2/]9].W_>_4(\_49]9?UJ/7FYF
M;U0Z1'7^;9DPWO9!_UR_7<]>WU_O_V3_3S]CCV2?:$]I7VXO=<__=M_^O__/
M2Y]LC[>?;K]OS_]PWW'O<O]T#W>_>,]YWX;//X??RI#/D.JQR7/[<65FGF:B
ML?L1[R"1`&XGIW#]R8!VRV"G/WL?J5[^4>^PM]]1[X.F@&/OD-EQ=?M`_]^@
M?.]]_VW?@`^!'X6_@S__A$^%7XD/BA^5'YR_G<^.;P./?]WA=C1R-2]V&#5R
M,:J,GW)N8G/"<%;)7"=A,&HI$?"?R>7;,%B`^P#)<R)L\)`;_-"HHB+\`$<0
M:6%BY_``[["-%65XRL*A3Z)?_WR$DD^37Y1OE7^6CY>?F*__F;^:SYO?GX^O
MS[=ON']\H!O*0?L`9K*`^M1O:V7V=?YPZ;)G0<"TT,O`WT#^=>^PJL^KWWR$
MJ9#9,>]P^\O`J9!YVN"TT+^`R["]=/^-DKY1C=.MGZZOK[^PS['?_[9_L_^U
M#[8?N<^ZW\7OS8__SI^^O[_/D(42KZ4_ID[5'__6+Z:+PV_$?W\/QJ_'O]T_
M_\G?RN_+_\^OT+_:G^4/YA__VR_</^/?WE_?;^P?8F_B+[_C/^;OY__I#_/O
M4_Y#PE!=O7%Y56",\`$0;KR0<A)MD61F;TI@;64__^F/ZI_%C^RO[;_RS^$_
M\5__\F_V'_<O_0_2SWPO^M_[[_\#G_X?_R\+OP%/`E\.7P1_K06/9&KBPE!S
MC.!R:Z__"A_\GPPO#3\1WP]?$&\1?_<2CQ.?:F5-BX!58+SA!I\/!Z\(M(V`
M08!"24XH+#(IPD,E(C0E<"AIT"YE+B`9D"V-\L)2O#,R)L(E<,,PO+!RO/#_
MJ5<5WQ;O%_\BOR//"0T9G_\:KQN_',\=WS#?'_]4'(P1EZFP6)#!06A!L'5G
MD.`=H\([6!!58(U1:VYOKG?"0,$3I!!20(%BP3&?BX`KORS/+=0XT'5BC"'^
M=-4,*:\JORY/+U\P;S%_WS*/,Y\TKS6_:CA0D="],/O"<,)2>OD!PG"I6+W`
MI\*<,S$ZGSNO/+9I9\-`\:>`*&UUD>`GP+Q@56#_PG##$"=S/:\^OS_/0-]!
M[W]&CT0/11]&+T<_2$]J94;?J*",$8V`IX"\P'>H$*>`CR3B3`]-'RW41DQ4
M)@/W)U;"4F`B."8A3\4Z(U!/_U%?4F]3?U2/62]6KU>_6,_O6=]:[UOT:?!N
MPB%=KUZ_+2W49EQB7-%RC/!)1=]R4&G@9B#"8/#@9#H@J$*.)Z>`.4!SD&5W
M<U`__V.O9+]ESV;?:W]H_VH/:Q_W;"]M/UOE3[Q!\/!O'W`OY2W4;,)09W5W
ML*G!D+#]*"-Y=!]U+W8_=T]X7WS_OWI_>X]\GWVO?K];Y4+!,O^G9H!0(=*)
M(*J0.B"`GX&O]RW4J7`X0'3Z?X5/AE^';_^(?XT?BI^+KXR_C<^.WY<__Y5O
MEG^7GYBOF;^:SYO?G.__IF^?#Z`?DC^33PD/H=^B[_^C_Z4/L9^G+Z@_J4^J
M7ZMO^5OT*RV[8*]?L&^6[[)__[./N"^UK[:_M\^XW[GO6_3X?"!4D*FLWZWO
MKO0AX4)0.!!G<F%M^E!R$8.036%IP'%G($S]D9$ANY^\K[V_OL^_W\1_?\'_
MPP_$'\4OQC_'1TN`<_T]0&TFXG/"R'_)CZ[E^E#,<W.#83H@<V5*0?CP'G7Z
M,<P!2Y(AX#0P,'I`V5!DRW"#,"9P^4!M_X0_S<_.W\_OT/_5G],?U"__U3_6
M3]=?QS?9_]L/KO38]/QS8TKP3U!+DOG#D8+<],)EW:LM4U5"WG_?C__@G^&O
M[`^N;^)?XV_D?^6/W^:?YZ_HO^G/V$QU%7#N1_IF.!!M[O_=IO3?]>_*IOGP
MHE5.\._Q__,/]!_WK__XO_U?^M_[[_S__@__'\=&9%%U2T!T:3C@@Y!S^F@]
M,&Q=@`%A`V\$?TXF^7(08W1*`>[3[K`",SE080QP<B]O<,NP<<!OA'(Z.,!R
M,D!CW)'^<]Y!!R('?PB/"9\*KPN__Q!?#=T5TVZ2#N\/_Q$/$A__NO\;+QP_
M'4\>7Q]O('\.3_\C#RS?)2^KWR>/*)\P2"NV/Q72L7@LF!7#+)\5-C<R/32!
M4"N0*ELP(17O9S+_WD#W'T_`-(`Z@2])-<@L4/PS-BT_+D\O7SCF)S\T7_\I
M7RIO*W\LCT!_08]"G[(`_\>LRPT4[SO/RJ7,#T1?16__1G]'CTB?2:]*OTO/
M3-O9#?_<?X!_4#_;]]V_!N]3'U0O_U4_5D]77UAO67]:CUN=[FW_7E]?;X*U
M`D_P?V(?8R]D/_]E3V9?9V]H?VF/:I];N&UO_VY_]O0`WP'O<*L&3W)O<W__
M=(]\?WV/]R]V3W=?>&]Y?_]ZCTT6$Z]_41=O&'\9@87/_X;?%P49SX,/A!^%
M+XB_B<__BM^+[XS_0O^6#Y<?F"^2WI\V7S=O.'\YCSJ=,3`^(0`O0DQ/0TM1
M5?A/5$6A+Z:O.W^K_Z+7QC6<T:E@3T19.IVGT`NMOSRQ-Z"Q2%1-3`6:('VR
M<```'P!'$`$````>````;0!E`',`<P!A`&<`90`O`'(`9@!C`#@`,@`R````
M```#`"8```````,`-@```````P#>/^G]```#`/$_"00```,`_3_D!```'P!P
M``$```!*````3`!/`$X`1P`L`"``3`!/`$X`1P`@`&T`80!T`&@`(``M`"``
M80!K`&$`(``V`#0`8@!I`'0`(`!M`&$`=`!H`"X`+@`N`"X```````L`\A`!
M````'P#S$`$```!>````4@!%`"4`,P!!`"``3`!/`$X`1P`L`"``3`!/`$X`
M1P`@`&T`80!T`&@`(``M`"``80!K`&$`(``V`#0`8@!I`'0`(`!M`&$`=`!H
M`"X`+@`N`"X`+@!%`$T`3```````"P#T$``````+`/40``````L`]A``````
M`@%'``$````O````8SU54SMA/2`[<#US<'-S.VP]2%%%34%)3#$M,#$P-S`U
M,#`R.#,Y6BTQ,S4V-P```@'Y/P$```!(`````````-RG0,C`0A`:M+D(`"LO
MX8(!`````````"]//5-04U,O3U4]0T]24$]2051%+T-./5)%0TE0245.5%,O
M0TX]4$A!3$P`'P#X/P$````:````2`!A`&P`;``L`"``4`!H`&D`;`!I`'``
M`````!\`.$`!````#````%``2`!!`$P`3`````(!^S\!````2`````````#<
MIT#(P$(0&K2Y"``K+^&"`0`````````O3SU34%-3+T]5/4-/4E!/4D%412]#
M3CU214-)4$E%3E13+T-./5!(04Q,`!\`^C\!````&@```$@`80!L`&P`+``@
M`%``:`!I`&P`:0!P```````?`#E``0````P```!0`$@`00!,`$P```!```<P
MC\<N]>@$P0%```@P8$#R<.D$P0$?`!H``0```!(```!)`%``30`N`$X`3P!4
M`$4``````!\`-P`!````4@```%(`10`Z`"``3`!/`$X`1P`L`"``3`!/`$X`
M1P`@`&T`80!T`&@`(``M`"``80!K`&$`(``V`#0`8@!I`'0`(`!M`&$`=`!H
M`"X`+@`N`"X``````!\`/0`!````"@```%(`10`Z`"```````!\`'0X!````
M2@```$P`3P!.`$<`+``@`$P`3P!.`$<`(`!M`&$`=`!H`"``+0`@`&$`:P!A
M`"``-@`T`&(`:0!T`"``;0!A`'0`:``N`"X`+@`N```````?`#40`0```'8`
M```\`#,`0@!%`$8`,`!!`#,`,0`X`$,`,`!!`$8`0P`T`$,`.0!%`$8`.0`P
M`#@`-@`S`$,`,0!%`#,`10`P`#0`0P`V`#(`,`!#`#0`-P!``&@`<0!E`&T`
M80!I`&P`,0`N`',`<`!S`',`+@!C`&\`;0`^```````+`"D```````L`(P``
M`````P`&$`WGXJ,#``<06P8```,`$!```````P`1$``````>``@0`0```&4`
M``!)3D%.4U=%4E1/64]54D]224=)3D%,455%4U1)3TY!0D]55%=(14Y42$59
M0T%-14E.3U,O-#`P+%1(14,K*U-54%!/4E1"4D]51TA45$A%34E.5$]03$%9
M5T4L05-%3D154T52``````(!?P`!````.P```#PS0D5&,$$S,3A#,$%&0S1#
M.45&.3`X-C-#,44S13`T0S8R,$,T-T!H<65M86EL,2YS<'-S+F-O;3X``'S$
`
end
+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---