TweetFollow Us on Twitter

Sep 96 Top 10
Volume Number:12
Issue Number:9
Column Tag:Symantec Top Ten

Symantec Top 10

By Craig Conner

Note: Source code files accompanying article are located on MacTech CD-ROM or source code disks.

This month we start with a few THINK Pascal questions, then run through questions dealing with exception handling (or lack thereof), and then finish off with some miscellaneous topics.

The first question is from a news post:

Q: I have a large THINK Pascal project that I have always compiled for 68K with a floating-point unit. I now want to compile for a 68030-based PowerBook that has no FPU. Unfortunately, I am having some problems linking. If I turn off 68881/68882 under Code Generation in the Compile Options dialog, I get a link error:

undefined: 3SINH2 (Activation.p)

undefined: 3TANH2 (Activation.p)

I need to use these functions but I do not know how to get rid of this error. I did remove the SANELib881.lib library and replace it with SANELib.lib, but I still get the error. Any suggestions?

A: Unfortunately, those functions are defined in SANE.p only if you are compiling with 68881/68882 on. Fortunately, here are sinh, cosh, and tanh defined:

 function SinH(x:real):extended;
 begin
 sinH:=(exp(x) - exp(-x))/2;
 end;

 function CosH(x:real):extended;
 begin
 cosH := (exp(x)+exp(-x))/2;
 end;

 function TanH(x:real):extended;
 begin
 TanH := SinH(x)/CosH(x);
 end;

 TanH can be optimized like this:

 function TanH(x:real):extended;
 var
 eToX, eToNegX:extended;
 begin
 eToX := exp(x);
 eToNegX := exp(-x);
 TanH := ( eToX - eToNegX ) / (eToX + eToNegX);
 end;

It will be a tad slower than using SANE, but it will work. You can look at how exp(x) works on p. 358 of the THINK Pascal Users Manual, and the hyperbolic functions in any trigonometry textbook.

Q: When using THINK Pascal, I want to create my own pattern for use with the PenPat routine. How do I do this?

A: You should use the StuffHex routine (QuickDraw) to build your patterns. StuffHex will interpret its argument as an 8-by-8 bit-pattern with 1’s denoting “on” bits, and 0’s denoting “off” bits. Like so:

var
 myPat :Pattern;

StuffHex(@myPat, 'FFFFFFFFFFFFFFFF'); {All on}

Q: In THINK Pascal, whenever I try TextFace(bold), I get an “incompatible type” error. Why?

A: The “styles” used in Pascal are values in a set and need to be expressed as [bold], [underline], [italic], etc. Normal text is specified as the empty set, []. Try:

TextFace([bold]);


Q: In a TCL project that I am updating to version 8.1, I get an “undefined” error on catch_. What might cause this?

A: If you are using native exceptions (which is standard for 8.1 projects), catch_ has been redefined as catch_reference. Here is an example:

try_
{
   DoIt();
}
catch_reference(CException, e)
{
   errVal = e.GetErr();
}
catch_all_()
{
   errVal = -1;
}
end_try_

Q: I have just completed my latest project using TCL, and want to use MrC++ for the finishing touch. However, I get link errors when trying to build it. Why?

A: MrC and MrC++ do not have native exceptions built in, so you need to change the libraries some to get your project to link correctly. Remove the current CPlusLib TCL.o and BRLib libraries, and replace them with the ones that use the non-native exception handling. These are CPlusLib TCL_BELeh.o and BRLib(non-native eh).o. That should get it working.

Q: I just saw a note in the fp.h header recently about dtox80 and x80tod being contained in a library called MathLib v.2. Why was it not included on the last CD?

A: That note in the header file is premature. Apple has not released a new version yet. Currently you can use ldtox80 and x80told and they will work correctly.

Q: While compiling the OpenDoc project ODFFramewrk.RB.Π I get “not enough memory” errors when trying to load the precompiled header called ODFHeaders.RB. How can I fix this?

A: The obvious answer is to get more RAM. OpenDoc will require at least 32 megs, and the more the merrier. Turning on Virtual Memory should also work, but will slow compiling down. If Virtual Memory is too slow, you can change the size of the precompiled header using a switch set up for the headers. In the ODF.pch file, there is a:

#define FW_AGGRESSIVE_PRECOMPILE 1

Change this to 0 and then do the same for FWEnvDev.h. After re-precompiling, the ODFHeaders.RB file will be smaller.

Q: I am trying to build a 68K version of one of my SPM projects. I get the following error at link time using Link via ToolServer:

### While reading file "long pathname:MPW68KRuntime.o.o"
### Link: Error: PC-relative edit, offset out of range.
(Error 48) %__MAIN (309)
Reference to: main in file: pathname:main.cp.o

A: There are some nuances that you need to take care of when using ToolServer to link a 68K application in the link order file (the .lo file). The MPW68KRuntime library uses Near code, so it needs to be near the top of the list (in one of the first two segments that get created). Also, since that library calls the main routine, the file that contains that routine needs to be near that library. If you get a similar error after rearranging, then you need to turn on Far Code in the linker options, and use Far libraries where possible. Any library that does not have a Far version (like the runtime lib) needs to go near the top of the list.

Q: When using the alloc_gla memory package with the Vector demo, it reports heap corruption. What is wrong with the example?

A: Looking at the example, we see code like this:

    vector(int size)   { v = new T[size]; sz = size; };
    ~vector()          { delete v; };

This code may have been correct at one time, but nowadays it is not. Since the new call allocates an array, the delete operator is no longer the proper operator to use. Instead, the delete[] operator should be used, and alloc_gla will stop complaining:

    vector(int size)   { v = new T[size]; sz = size; };
    ~vector()          { delete[] v; };

Q: If I realign a structure like so:

#pragma options align=mac68k
struct{
...
}myStruct;
#pragma options align=powerpc 

my program crashes when trying to use myStruct. What might be happening?

A: The default setup for PPC projects is to use four-byte boundaries. align=powerpc will align to two-byte boundaries, and could cause incompatibilities. Use #pragma options align=reset instead, and that should fix the problem.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

CSR Racing 2: Your guide to what's...
CSR Racing 2, or CSR2, as it likes to call itself, has finally arrived. The follow-up to the immensely popular drag racing game CSR Racing is the first release from NaturalMotion since the studio's acquisition by Zynga in early 2014. [Read more] | Read more »
The Slaughter: Act One (Games)
The Slaughter: Act One 1.0.323 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0.323 (iTunes) Description: “The game mixes realism and surrealism to create a story that can cause just as much laughter as fear. A-” -... | Read more »
NEO TURF MASTERS (Games)
NEO TURF MASTERS 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: NEOGEO’s legendary golf game is back, in a brand-new mobile version with touch controls! NEO TURF MASTERS (also known as “BIG... | Read more »
How to send money to a friend with the F...
Facebook is already a lot of things to a lot of people. It's a social network, sure, but also a tool for catologing memories, chatting with friends, and much more. [Read more] | Read more »
Branch out into the Chinese market with...
Created a game that you’re super enthused about, only to find yourself struggling to get it the exposure that you believe it duly deserves? With the time, energy and money that goes into development, it’s only right that games should be given the... | Read more »
Pocket Arcade Story (Games)
Pocket Arcade Story 1.00 Device: iOS Universal Category: Games Price: $4.99, Version: 1.00 (iTunes) Description: Here comes a new challenger: it's the arcade simulation game you've been waiting for! Build your very own gaming... | Read more »
How to get coins faster in Rodeo Stamped...
There comes a time in a cowboy or cowgirl's life when all the riding and lassoing skills in the world aren't enough. You're going to need some cold, hard cash to keep your sky zoo expanding in Rodeo Stampede. [Read more] | Read more »
How to out-do Cam Newton in Can You Dab?
The thing about dance crazes is that you're never really sure when they've run their course. Take the Dab, for instance. Propelled by its adoption as the touchdown celebration of choice for Carolina Panthers quarterback Cam Newton, the Dab seemed... | Read more »
Artik Games releases Splashy Cats for An...
Splashy Cats had us hooked from the title alone, and when we found out the game was literally just zig-zagging one of our favourite pop-culture references, guised as a playable cat character, down a river – our appetites were whetted to say the... | Read more »
Battle Cars (Games)
Battle Cars 1.1 Device: iOS Universal Category: Games Price: $1.99, Version: 1.1 (iTunes) Description: Welcome to the world of Battle Cars. Battle Cars is a classic arcade top-down racing game with fast mini cars and funny weapons to... | Read more »

Price Scanner via MacPrices.net

9-inch 128GB Silver iPad Pro on sale for $50...
B&H Photo has the 9.7″ 128GB Silver Apple iPad Pro on sale for $699 including free shipping plus NY tax only. Their price is $50 off MSRP. Read more
Why Use Indie Opera And Vivaldi Instead Of Sa...
For many years my web browser workhorses were various permutations and spinoffs of the Netscape/Mozilla/Firefox Open Source platform, and the Norwegian indie browser Opera, which I took a shine to... Read more
Western Digital Launches Worlds Fastest 256GB...
At the Mobile World Congress in Shanghai Western Digital Corporation this week introduced a new suite of 256 gigabyte (GB) microSD cards, which includes the new 256GB SanDisk Extreme microSDXC UHS-I... Read more
KeyCue 8.1 Integrates With Typinator To Displ...
Ergonis Software has released KeyCue 8.1, a new version of the company’s keyboard shortcut cheat sheet. KeyCue 8 introduced a new way to define a wide variety of triggers, which can be used to... Read more
Save up to $600 with Apple refurbished Mac Pr...
Apple has Certified Refurbished Mac Pros available for up to $600 off the cost of new models. An Apple one-year warranty is included with each Mac Pro, and shipping is free. The following... Read more
21-inch 2.8GHz iMac on sale for $1199, save $...
Amazon has the 21″ 2.8GHz iMac (model #MK442LL/A) on sale for $1199.99 including free shipping. Their price is $100 off MSRP, and it’s the lowest price available for this model. Read more
13-inch 2.5GHz MacBook Pro (Apple refurbished...
Apple has Certified Refurbished 13″ 2.5GHz MacBook Pros available for $829, or $270 off the cost of new models. Apple’s one-year warranty is standard, and shipping is free: - 13″ 2.5GHz MacBook Pros... Read more
MacBook Airs on sale for up to $50-$100 off M...
B&H Photo has 13″ and 11″ MacBook Airs on sale for up to $100 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 11″ 1.6GHz/128GB MacBook Air: $849 $50 off list price - 11″ 1.... Read more
Brexit Vote Result Forecast To Slash UK 2016...
Uncertainty and economic volatility can be expected to increase over the next nine months, as the Brexit and concerns over the future of the EU hit IT investment, say Canalys market analysts, with... Read more
13-inch 256GB MacBook Air on sale for $1149,...
Amazon has the 2016 13″ 1.6GHz/256GB MacBook Air (model MMGG2LL/A) on sale for $1149.99 including free shipping. Their price is also $50 off MSRP. Read more

Jobs Board

*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
*Apple* iPhone 6s and New Products Tester Ne...
…we therefore look forward to put out products to quality test for durability. Apple leads the digital music revolution with its iPods and iTunes online store, Read more
*Apple* iPhone 6s and New Products Tester Ne...
…we therefore look forward to put out products to quality test for durability. Apple leads the digital music revolution with its iPods and iTunes online store, Read more
*Apple* iPhone 6s and New Products Tester Ne...
…we therefore look forward to put out products to quality test for durability. Apple leads the digital music revolution with its iPods and iTunes online store, Read more
*Apple* Retail - Multiple Positions, Willow...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.