<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=utf-8"><meta name=Generator content="Microsoft Word 15 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:"}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman",serif;}
p.msochpdefault, li.msochpdefault, div.msochpdefault
{mso-style-name:msochpdefault;
mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman",serif;}
span.emailstyle18
{mso-style-name:emailstyle18;}
span.apple-tab-span
{mso-style-name:apple-tab-span;}
span.EmailStyle20
{mso-style-type:personal;
font-family:"
color:#1F497D;}
span.EmailStyle21
{mso-style-type:personal-reply;
font-family:"Calibri",sans-serif;
color:#1F497D;}
.MsoChpDefault
{mso-style-type:export-only;
font-family:"Calibri",sans-serif;
mso-fareast-language:EN-US;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=EN-GB link="#000000" vlink="#000000"><div class=WordSection1><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>I am amazed, and very glad, it works, been ages since I wrote any “C” ….<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>.. and as for threads, well they are hidden in the headers, and should just pick up again. <o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Dave Wade<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>G4UGM<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'><o:p> </o:p></span></p><div style='border:none;border-left:solid blue 1.5pt;padding:0cm 0cm 0cm 4.0pt'><div><div style='border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0cm 0cm 0cm'><p class=MsoNormal><b><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri",sans-serif'>From:</span></b><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri",sans-serif'> rubhone@aol.com [mailto:rubhone@aol.com] <br><b>Sent:</b> 31 July 2015 13:01<br><b>To:</b> dave.g4ugm@gmail.com<br><b>Subject:</b> Re: [Simh] Porting simh for IBM VM/CMS<o:p></o:p></span></p></div></div><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Your code does the trick, Thank You! <o:p></o:p></span></p><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>I' m not sure how to post this back to the email list in the same thread?<o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'><o:p> </o:p></span></p></div><div><p class=MsoNormal style='margin-bottom:12.0pt'><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Fritz<br><br><o:p></o:p></span></p><div><p class=MsoNormal style='margin-bottom:12.0pt'><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>-----Original Message-----<br>From: Dave G4UGM <<a href="mailto:dave.g4ugm@gmail.com"><span style='color:windowtext'>dave.g4ugm@gmail.com</span></a>><br>To: 'Jordi Guillaumes i Pons' <<a href="mailto:jg@jordi.guillaumes.name"><span style='color:windowtext'>jg@jordi.guillaumes.name</span></a>>; rubhone <<a href="mailto:rubhone@aol.com"><span style='color:windowtext'>rubhone@aol.com</span></a>><br>Cc: simh <<a href="mailto:simh@trailing-edge.com"><span style='color:windowtext'>simh@trailing-edge.com</span></a>><br>Sent: Wed, Jul 29, 2015 6:29 am<br>Subject: RE: [Simh] Porting simh for IBM VM/CMS<o:p></o:p></span></p><div id="AOLMsgPart_2_e05d5529-7b97-46c7-9386-b62bedb069a2"><div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>I assume it is this line in sim_defs.h that causes the issue…</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>#define SWMASK(x) (1u << (((int) (x)) - ((int) 'A')))</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>What a nasty piece of code (sorry folks)….</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>… So to make it really horrid we can use nested “?” operator. So we have </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>{expr1} ? {expr2} : {expr3}</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>So if “expr1” is true we execute “expr2”, otherwise “expr3”. </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Nesting this we have </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>{expr1} ? {expr2} : ( {expr3} ? {expr4} : {expr5}),</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>If “expr1” is “true” we do “expr2”, </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>if “expr1” is false and “expr3” is true we do “expr4” </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>if “expr1 and expr3 are both false we do “expr5”</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Hacking the macro gives use something like this:-</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Courier New";color:#1F497D;mso-fareast-language:EN-US'>#define SWMASK(x) (1u << ( ((int)(x)<(int)('I')) ? (((int)(x)) - ((int)'A')) : ( ((int)(x)<(int)('S'))? (((int)(x))+9-((int)'J')) : (((int)(x))+20-((int)'S')) ) ))</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Not sure the brackets match but basically use “?” to say </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal style='text-indent:-18.0pt'><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>1.</span><span style='font-size:7.0pt;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>if its “A” to “I” then the old logic works, </span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal style='text-indent:-18.0pt'><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>2.</span><span style='font-size:7.0pt;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>if its “J” through “R” then you need to take off “J” and add “9”</span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal style='text-indent:-18.0pt'><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>3.</span><span style='font-size:7.0pt;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>if its “S” thru “Z” then take off “S” and add “18”</span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Truely noxious, needs surrounding by tests for VM, is that “__VM__”?</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>#if defined __VM__</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Courier New";color:#1F497D;mso-fareast-language:EN-US'>#define SWMASK(x) (1u << ( ((int)(x)<(int)('I')) ? (((int)(x)) - ((int)'A')) : ( ((int)(x)<(int)('S'))? (((int)(x))+9-((int)'J')) : (((int)(x))+20-((int)'S')) ) ))</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>#else</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>#define SWMASK(x) (1u << (((int) (x)) - ((int) 'A')))</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>#endif</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>I now need to lie down in a dark room with a nice COBOL manual..</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Dave</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>G4UGM</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'>Actually off to a Theater Organ Concert.</span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'><a href="http://www.ltot.org.uk/"><span style='color:windowtext'>http://www.ltot.org.uk/</span></a></span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div style='border:none;border-left:solid blue 1.5pt;padding:0cm 0cm 0cm 4.0pt'><div><div style='border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0cm 0cm 0cm'><div><p class=MsoNormal><b><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>From:</span></b><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'> Simh [<a href="mailto:simh-bounces@trailing-edge.com"><span style='color:windowtext'>mailto:simh-bounces@trailing-edge.com</span></a>] <b>On Behalf Of </b>Jordi Guillaumes i Pons<br><b>Sent:</b> 29 July 2015 08:03<br><b>To:</b> <a href="mailto:rubhone@aol.com"><span style='color:windowtext'>rubhone@aol.com</span></a><br><b>Cc:</b> <a href="mailto:simh@trailing-edge.com"><span style='color:windowtext'>simh@trailing-edge.com</span></a><br><b>Subject:</b> Re: [Simh] Porting simh for IBM VM/CMS</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div></div><div><p class=MsoNormal><span style='font-family:"color:black'> <o:p></o:p></span></p></div><div><div><p class=MsoNormal><span style='font-family:"color:black'>Sorry for top posting.<o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-family:"color:black'> <o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-family:"color:black'>Write a remapping macro to convert from the array index to the EBCDIC encoding. Use conditional compilation so when the target OS is not VM or MVS it does nothing and returns the original index.<br><br>Jordi Guillaumes Pons<o:p></o:p></span></p></div><div><div><p class=MsoNormal><span style='font-family:"color:black'> <o:p></o:p></span></p></div></div></div><div><div><p class=MsoNormal><span style='font-family:"color:black'><br>El 29/07/2015, a les 7:06, <a href="mailto:rubhone@aol.com"><span style='color:windowtext'>rubhone@aol.com</span></a> va escriure:<o:p></o:p></span></p></div></div><blockquote style='margin-top:5.0pt;margin-bottom:5.0pt'><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>I have made substantial progress in an attempt to run simh under IBM's VM/370 CMS environment. </span><span style='font-family:"color:black'><o:p></o:p></span></p></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Difficulties include:</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span class=apple-tab-span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span></span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>lack of a proper "make" facility</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span class=apple-tab-span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span></span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>external reference and symbolic names limited to 8 characters</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span class=apple-tab-span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span></span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>no hierarchical file system</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span class=apple-tab-span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span></span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>OS dependencies for file I/O, timers, etc.</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span class=apple-tab-span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span></span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>file system preference for fixed length 80 byte record-oriented files</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span class=apple-tab-span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span></span><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>makes importing source code awkward</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Despite all of this, I am currently able to compile, load and execute the simh scp for a</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>target ALTAIR system. Console interactions (set/show) are fine, and the sim will run</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>"do" files upon startup and interactively.</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>I am currently trying to get the "attach <dev> <file>" code working. This made me realize</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>that a compiler (gcc) warning regarding sim_switches and SWMASK is a real issue.</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>The EBCDIC character set used on IBM systems has gaps in the codes for "A" to "Z",</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>occupying an integer range of 41 values. This causes the left shift in SWMASK to exceed</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>the defined size of int32 for sim_switches.</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>My broad range of old-school programming by no means makes me an expert in C.</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Any ideas on a compact solution for this character set problem?</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Regards,</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'>Fritz</span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div><div><div><p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial",sans-serif;color:black'> </span><span style='font-family:"color:black'><o:p></o:p></span></p></div></div></div></blockquote><blockquote style='margin-top:5.0pt;margin-bottom:5.0pt'><div><div><p class=MsoNormal><span style='font-family:"color:black'>_______________________________________________<br>Simh mailing list<br><a href="mailto:Simh@trailing-edge.com"><span style='color:windowtext'>Simh@trailing-edge.com</span></a><br><a href="http://mailman.trailing-edge.com/mailman/listinfo/simh"><span style='color:windowtext'>http://mailman.trailing-edge.com/mailman/listinfo/simh</span></a><o:p></o:p></span></p></div></div></blockquote></div></div></div></div></div></div></div></body></html>