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;
 sinH:=(exp(x) - exp(-x))/2;

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

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

 TanH can be optimized like this:

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

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:

 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:


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:

catch_reference(CException, e)
   errVal = e.GetErr();
   errVal = -1;

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:


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
#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

Gopogo guide - How to bounce like the be...
Nitrome just launched a new game and, as to be expected, it's a lot of addictive fun. It's called Gopogo, and it challenges you to hoparound a bunch of platforms, avoiding enemies and picking up shiny stuff. It's not easy though - just like the... | Read more »
Sago Mini Superhero (Education)
Sago Mini Superhero 1.0 Device: iOS Universal Category: Education Price: $2.99, Version: 1.0 (iTunes) Description: KAPOW! Jack the rabbit bursts into the sky as the Sago Mini Superhero! Fly with Jack as he lifts impossible weights,... | Read more »
Star Wars: Galaxy of Heroes guide - How...
Star Wars: Galaxy of Heroes is all about collecting heroes, powering them up, and using them together to defeat your foes. It's pretty straightforward stuff for the most part, but increasing your characters' stats can be a bit confusing because it... | Read more »
The best cooking apps (just in time for...
It’s that time of year again, where you’ll be gathering around the dinner table with your family and a huge feast in front of you. [Read more] | Read more »
Square Rave guide - How to grab those te...
Square Rave is an awesome little music-oriented puzzle game that smacks of games like Lumines, but with its own unique sense of gameplay. To help wrap your head around the game, keep the following tips and tricks in mind. [Read more] | Read more »
Snowboard Party 2 (Games)
Snowboard Party 2 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Crowned the best snowboarding game available on the market, Snowboard Party is back to fulfill all your adrenaline needs in... | Read more »
One Button Travel (Games)
One Button Travel 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: “To cut a long story short, If you like interactive fiction, just go buy this one.” - “Oozes the polish that... | Read more »
Light Apprentice Volume 1 (Games)
Light Apprentice Volume 1 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Light Apprentice Volume 1 includes Chapters 1 to 4, all gathered in a new exclusive game. When life in the world of... | Read more »
The best games like Animal Crossing on m...
Animal Crossing amiibo Festival is out right now for the Wii U, reminding us of just how much fun that world can be. Or at least to go back and check in on our villages once in a while. [Read more] | Read more »
Between 2 Taps - Tap for Tap interview M...
Hello, and welcome back to Between 2 Taps, Tap for Tap’s Indie Dev interview series. [Read more] | Read more »

Price Scanner via

iMobie Releases its Ace iOS Cleaner PhoneClea...
iMobie Inc. has announced the new update of PhoneClean 4, its iOS cleaner designed to reclaim wasted space on iPhone/iPad for use and keep the device fast. Alongside, iMobie hosts a 3-day giveaway of... Read more
Black Friday deals on the Apple Watch and App...
Apple resellers are offering discounts and bundles with the purchase of an Apple Watch this Black Friday weekend. Below is a roundup of the deals being offered by authorized Watch resellers: Apple... Read more
Early Black Friday sale at B&H Photo, up...
B&H Photo has all new Macs on sale for up to $500 off MSRP as part of their early Black Friday sale including free shipping plus NY sales tax only: - 15″ 2.2GHz Retina MacBook Pro: $1699 $300 off... Read more
NewerTech/OWC/MacSales Black Friday Deals 201... • Free Shipping available on nearly EVERYTHING on orders $35.00 & up within USA + • International Delivery Specials from $2.99+ Special Purolator... Read more
Walmart Black Friday deals: $100 off select i...
Walmart has released their Black Friday deals for 2015, now available online. Choose free shipping or free local store pickup (if available): - 16GB iPad Air 2: $399, $100 off MSRP - 16GB iPad Air: $... Read more
Photo Cleaner 1.0 Reclaims iPhone Storage Spa...
Seoul, Korea based mix1009 has announced the release and immediate availability of Photo Cleaner 1.0, their handy iPhone app that deletes the video portion of Live Photos, in order to reclaim space... Read more
Black Friday and Holiday sales on our price t...
Scan our Mac Price Trackers for the latest Black Friday and Holiday season information on sales, bundles, and availability on systems from Apple’s authorized internet/catalog resellers. We update the... Read more
Best Buy Black Friday deals: Up to $200 off M...
Best Buy has posted their Black Friday sale prices for 2015. Save on MacBook Pros, MacBooks, MacBook Airs, iMacs, iPads, and Apple Watches. Choose free shipping or free local store pickup (if... Read more
Save $30-$40 on new Apple TVs after rebate
Adorama has new Apple TVs on sale for up to $40 off MSRP after mail-in rebate, good through December 15th. Shipping is free, and Adorama charges NY & NJ sales tax only: - 32GB Apple TV: $119.99... Read more
13-Inch Haswell MacBook Air At Two Years – Th...
The 13-inch mid-2013 “Haswell” MacBook Air I ordered in Apple’s November 2013 Black Friday sale was my first new Mac in four and a half years — the longest interval I’ve gone between system upgrades... Read more

Jobs Board

Storefront Operations Coordinator, *Apple* -...
# Storefront Operations Coordinator, Apple -Latin America Job Number: 43587750 Miami, Florida, United States Posted: Oct. 16, 2015 Weekly Hours: 40.00 **Job Summary** The Read more
*Apple* Enterprise / Government Professional...
# Apple Enterprise / Gove ment Professional Services Engineer Job Number: 42292976 Reston, Virginia, United States Posted: Aug. 18, 2015 Weekly Hours: 40.00 **Job Read more
iOS Wallet & *Apple* Pay Engineer - App...
# iOS Wallet & Apple Pay Engineer Job Number: 40586801 Santa Clara Valley, Califo ia, United States Posted: Nov. 16, 2015 Weekly Hours: 40.00 **Job Summary** The iOS Read more
Software Engineer, *Apple* Watch - Clock Fa...
# Software Engineer, Apple Watch - Clock Face Team Job Number: 44368761 Santa Clara Valley, Califo ia, United States Posted: Nov. 14, 2015 Weekly Hours: 40.00 **Job Read more
Administrative Assistant, *Apple* Online St...
# Administrative Assistant, Apple Online Store Job Number: 43992352 Santa Clara Valley, Califo ia, United States Posted: Nov. 9, 2015 Weekly Hours: 40.00 **Job Summary** Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.