TweetFollow Us on Twitter

Nov 89 Mousehole
Volume Number:5
Issue Number:11
Column Tag:Mousehole Report

Mousehole Report

By Rusty Hodge & Larry Nedry, Mousehole BBS

From: Tomt

Re: global variables

This is probably a dumb question but is there a way in LSP 2.0 to create global variables that are accessible by multiple units? As an old Fortran person I’d really like the equivalent of a common statement to give global scope to a variable, I’d even settle for something likes C’s extern statement. Thanks for any help. By the way I’d like this to work independently of the build order.

From: Siegel

Re: global variables

Declare any public globals in the interface-part of a UNIT, and any other UNITs that want that global should USE the UNIT where the global is declared.

From: Jmoreno

Re: global variables

The best way to create global variable that are accessible by multiple units AND independent of the build order is to create a unit with just global declarations and have it first in the build and have all of your units use it. Something like this

Unit MyGlobals;
INTERFACE
CONST
MyConst = 32;
TYPE
MYTPE = INTEGER;
VAR
MyGlobalVar: INTEGER;
SecndGlob:Str255;
IMPLEMENTATION
{ I don’t need no stinkin implementation}
END.

From: Macww

Re: global variables

Someone else has probably replied by now, but here goes. It is very common for a Pascal program to have a separate unit, consisting of an interface section only, declaring all global constants, variables, types, etc. Put it first in the build order, but the order of subsequent units will not matter vis a vis the Globals unit.

From: Jmoreno

Re: Dispatch Table

I’m trying to gain some experience with C by translating a program I have from Pascal to C. I don’t want to do a line by line translation, and I noticed that I could handle menu events using a dispatch table to functions instead of a bunch of switch statements. My problem is that I can not get the dispatch table to compile under Think C 3.0. Could somebody please post an example of one?

From: Noisy

Re: Dispatch Table

One way to code a dispatch table in C is to create an array of pointers to functions. That way you can provide your own indexing techniques and bypass multiple depths of switch() statements. This does have some limitations though: since all the calls are made through a single statement, ensuring that each function gets the correct type/number of parameters can be a headache (typecasting unsigned longs is probably your best bet). Secondly, heaven help you if you try to jump with an invalid index value...you’ll discover the delights of the BRND (Branch to random address) opcode! Anyway...here’s a little source to help you on your way:

typedef void (*FuncPtr)();
FuncPtr func_list[] = { my_func1, my_func2, my_func3 };
...
index_val = 2; /* whichever value you want to jump to
(*func_list[index_val])(parameters...);
...

Eh voila! Instant jump table.

From: Gurglekat

From: Dhands

Re: MacApp & Dialog Items

I just started using MacApp 2.0b9 and I have a simple question... What’s the best way to validate a dialog item’s data before dismissing the dialog? I currently override the “CanDismiss” function and check the items there, this seems awkward as I go about checking each field for valid data. The checks are very simple, for example, verify that all EditText items have text. Any suggestions?

From: MacDTS

Re: MacApp & Dialog Items

Override this taken from UMacApp.TControls

FUNCTION TControl.Validate: LONGINT;
BEGIN
Validate := noErr;
END;

Write the routine that validates the control’s data. Also look at how the numbered text controls work.

From: Chuckb

Re: Cross-Compilers

I’m looking for a cross-compiler that runs on a mac and compiles at least z80 code. I’d prefer to have one that does a variety of different processors. Does anyone have any experience with such a beast?

From: Apage

Re: Cross-Compilers

Check out MicroAsm’s in MacTutor’s ads, they have a wide variety of cross assemblers for the Mac.

From: Gpoole

Re: INITs

This is a fairly open-ended question but we would appreciate any help we can get on this matter. The subject is INIT’s, or more specifically, how to get along with them. We are developing a program for commercial release and all seems to work fine as long as we are using just Finder or MultiFinder, no bombs, errors, weird happenings, quitting unexpectedly, etc. As soon as we have some INITs in the system though, all kinds of weird things start happening. With that said, are there any general guidelines we as developers should follow in coding to peacefully co-exist with INITs? Are there any known defensive programming techniques? In case it helps, some the INITs we have are: DialogKeys (CE Software), SuperLaserSpool, PowerMenus, Capture, CanOpener, and Suitcase. Thanks for any help you can give.

From: Gurglekat

Re: INITs

The only thing I can think of for general defensive programming against INITs is to assume that ALL traps move memory. Patched traps can, of course, move memory, and INITs patch traps... I don’t remember where I heard this; maybe from one of Knaster’s books.

From: Rguerra

Re: INITs

It’s probably SAFEST to assume that ANY trap can move memory. While a patched trap’s code in and of itself doesn’t absolutely HAVE to move memory, there are no guarantees. If you’re going to patch traps, one should avoid appending code that moves memory in a trap that is NOT supposed to do so. But who knows what goes on so ... Let’s all be careful out there!

From: Gpoole

Re: INITs

Thanks for the replies to my INIT question, especially the one from DTS. I also asked them this same question and the reply was that there is nothing that can be done for defense. The trenches seem to know best.

From: Brad

Re: INITs

If your program doesn’t get along with the INIT’s you mentioned in your message, then either you have a knack for finding bugs in other people’s code, or your program is doing something very wrong. I work on a very large commercial product, and I run with dozens of INITs, MultiFinder, EtherTalk, etc, and darned near all of the crashes I see are either bugs in my code or bugs (occasionally) in the system. Some INITs out there are downright dangerous and shouldn’t be distributed, but many of those you mentioned could be considered standard equipment on many machines.

From: Brad

Re: INITs

It’s ridiculous to program as if any trap can move memory. If someone patches a trap that is documented as NOT moving memory, and, as a result of something in the patch, memory may be moved, then the patch has a bug and shouldn’t be used. Defensive programming is important; check your error codes, preflight, don’t assume, etc - but there’s no need to get carried away. Relocatable blocks don’t relocate unless provoked, and they only get purged if they’re purgeable and memory is tight. (But come System 7, and who knows...)

From: Gurglekat

Re: INITs

It’s not the tough to program as if any trap can move memory. All you really have to be careful of are WITH statements, keeping handles half-dereferenced across traps, and passing dereferenced elements of records in handles as VAR parameters. HLock and HUnlock aren’t that hard to use.

From: Coretech

Re: TEHilite, ColorWindows, & Mac II

I am making reference to the color that TextEdit uses for marking highlighted text for selection purposes. When the COLOR cdev changes this, does TE then ignore the color specified for highlighting in the window auxiliary record? Is there anyway to avoid this change from occurring? (I would like to be sure that highlighted text is always visible by controlling the colors myself). I don’t know much about color as I don’t have a color machine, but I do have an SE/30 which has the color QD roms. The only problem is that I don’t encounter the problem on the SE/30 machine, only on a true color machine. I fear that the problem stems from something that I am doing in my code. If the text that is highlighted is left highlighted and a different selection is highlighted, the second selection is highlighted without any problems. The problem only appears after I do a mouse down in content and then move the cursor location to the location of the mouse down, deselecting any highlighted text. If text is again highlighted, the problem of the “invisible highlighting” occurs once again. Please help me. I am new to the color world and would like to support it in my program.

From: Essam

Re: Simple INIT

There was a beautiful example of an INIT that stays around (by patching GetResource and ExitToShell to beep when an application is launched or quit, found in MacTutor June 1989. Unfortunately, this INIT was in Forth. Does anyone have a LSP Pascal version of this code?

From: Inbox

Re: LSP I/O procs

It seems that LSP’s built-in I/O procs don’t work properly with HFS. My app uses info passed by SFGetFile in the Open(myFileVar,name) call but I can’t access files that are in a directory other than the one the app is in. What should I do? Do I need to use PBGetCatInfo or something of this sort?!

From: Siegel

Re: LSP I/O procs

IF you’re getting back from a standard file call, do a SetVol(NIL, reply.vRefNum) before calling the library routines.

From: Unclejim

Re: Disk Based Scrolling

Help! I am still struggling with getting some disk based scrolling to work. I need to scroll around in 200-300K files and only keep 40-50K in memory at one time. (Scroll Up & down etc). I can’t seem to keep my scroll bars moving smoothly as I swap buffers and use TESetText etc. If anyone has even the simplest example of this disk based scroll in any language it would be a terrific help. Editing is not an issue at this stage just scroll up and down and keep track of the buffers. I thought it would be easy; it probably is, but I’m not having much luck so far. Thanks Jim

From: Inbox

Re: Ah, yes...

Yet another wall stands before me... Can an Apple IIGS connect to a Mac via the AppleTalk cable? It seems that I’ll have to pump data back and 4th between the Mac and the GS, and I wonder whether AppleTalk can do it. Also, what special knowledge will I have to obtain to use the thing?

From: Mrteague

Re: Ah, yes...

I have often transferred data between Apple IIGS & Mac, using a DIN-8 to DIN-8 serial cable, and comms software on each end - I have 19.2K out of it no problem. As for using AppleTalk - you would need to have appropriate software on both ends, and the only product that I know would fit your ends, is AppleShare. Can’t help you on the other question.

From: Jmoreno

Re: arrays as files

Here is some pascal source for finding you were launched with a file

CountAppFiles(AppMessage, NumAppFiles);

IF NumAppFiles <> 0 THEN { the user has opened documents from the finder }

that would be something like

CountAppFiles(AppMessage,&NumAppFiles);

if NumAppFile != 0 /* open the file */

From: Cforden

Re: Converting to TC 4.0 docs?

I have just started trying to get our project converted from THINK C 3.0x to version 4.0. There have been a few things I’ve had to change to do to accomplish the conversion. Not one of them has really stumped me for more than a hour, but I wonder: isn’t there any documentation addressed specifically to 3.0x users who are trying to convert their existing projects? We ordered our version 4.0 in response to Symantec’s upgrade brochure, but when I opened the package I saw no documentation directed towards those of us who already had 3.0 projects. I already like some of the little improvements in 4.0-- like allowing duplicate function prototypes-- but wish there was some hand holding by THINK for us as we convert. I also would like to see a complete list of differences between the two versions so I could take full advantage of all the improvements.

From: Siegel

Re: Converting to TC 4.0 docs?

The differences between earlier versions and 4.0 are described starting at the bottom of Page 8 in the 4.0 User’s Manual: “Notes For Experienced Users”.

From: Nedry

Re: Converting to TC 4.0 docs?

The Think 4.0 User’s Manual does not describe any differences between 3.0 and 4.0. It only describe the additions. I have had to modify every one of my projects dues to changes in Think C 4.0. Most changes are minor but they take time. A list of the changes would be nice to have!

From: Cforden

Re: Converting to TC 4.0

Some hints for converting your projects from THINK C 3.0 to 4.0. There is a serious bug-- atof(“.03”) returns a value of .3. (The new routine wrongly strips leading zeros between the decimal point and the first significant digit.) You will encounter “unknown error -192” when compiling files with previously precompiled headers. Re-precompile them. You will have to change ‘#include “strings.h” ‘ to: ‘#include “string.h”’. You will be allowed to have multiple identical function prototypes. The new version of ResEdit supplied (1.2) now allows you to open a Project.rsrc file and launch ResEdit by double clicking on the .rsrc file.

From: Brad

Re: Dialogs

Don’t over-complicate things. There is no restriction that all of the code for your XCMD needs to be local to your Main function. As long as the entry point is Main, you’re all set. If your filter function needs to access variables, just allocate them somewhere and stuff a reference to them (either a pointer or a handle, if you prefer) in the RefCon field of the dialog. Since your filter gets the dialogPtr passed to it, you can use GetWRefCon (dialogPtr) to access the reference to your variables.

From: Alamac

Re: LocalTalk xones

I’ve read the threads on this subject and I understand your need to provide a solution without adding a lot of expensive hardware. Check out a software solution called Liaison from Infosphere at 800 445 7085. It looks like it will accomplish what you want. Plug an Appletalk line into the printer port of a Mac and plug the other Appletalk line into the modem port of the same Mac, run Liaison in the background and voila, you have just created two Appletalk zones. Sorry for the late supply but my machine has been away for about 6 weeks. Hope this helps.

From: Gurglekat

Re: LocalTalk xones

Well, it looks like we got some little beastie from Shiva to do the zone divisions. It turned about to be close to $500, but what’s $500 when you NEED the thing?... Thanks for the reply anyway. The software solution sounds like a nice alternative.

From: Rguerra

Re: APPLICON

Has any seen or heard of an INIT called “Applicon”? It apparently was written by someone at Apple and implements a Set-Aside feature such that the switched out layer’s windows are zoomed down to a single icon placed on one side of the screen. I was told by another Apple employee that it has been discussed on AppleLink and the internal Usenet areas at Apple quite a bit and that the author wrote it as Freeware. If anyone has it, I’d really appreciate it if you’d upload it here. Thanks!

From: Gurglekat

Re: APPLICON

There’s a thing running around on CompuServe called AltWDEF (and another similar one called AWinDef, I believe) that does the window-shrink-to-icon business. It’s an evolving thing, so I’d need to check on it if you’re interested. Odds are that someone who calls here has it. I suggest you repost under a different header that long distance people (most of the users?) might not skip over.

From: Walrus

Re: Programming Environments

Is it my imagination or are many of the programming environments available on the MS-DOS machines slicker and simpler than on the Mac? I am most familiar with the Borland products for the IBM and the Symantec packages. For instance, you are writing a program, you try to run it and it bombs. Turbo whatever will blow you back into your source code, right where the problem happened. Turbo Pascal 3.0 was doing this years ago. Is there some inherent problem with the Mac that prevents some of these labor saving things (like moving necessary files into projects, can’t it do it on the fly?). Of course, I work on a mainframe so I still have to submit batch jobs to compile and run programs, but, the Mac is supposed to be slicker than the IBM!!

From: Siegel

Re: Programming Environments

The Symantec environments do all of this; if an error happens, the source debugger will show you where it was detected; also, both THINK C and THINK Pascal have commands to add the current window to a project, and THINK C will add a file as soon as you save it and compile it.

From: Gurglekat

Re: Programming Environments

As a matter of fact, I did a project a while back that run under Turbo/PC and Lightspeed/Mac both. At the time, Turbo/PC had just come out with a new version that looked suspiciously like it had taken a LOT of cues from Lightspeed. I’ve heard the new debugger in Turbo/PC looks a little bit too much like Lightspeed, too...

From: Arlen

Re: Programming Environments

Yes the “integrated” environments are slicker on the IBM. Why is a good question, but I suspect that it’s more difficult to do some of the cute hacks the IBM-ers do without breaking the programming rules for the Mac (at least I’m finding that a problem in the projects I work on). You can still break the rules if you want to, but be prepared for a customer service headache bigger than the Grand Canyon.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Macs Fan Control 1.3.1.0 - Monitor and c...
Macs Fan Control allows you to monitor and control almost any aspect of your computer's fans, with support for controlling fan speed, temperature sensors pane, menu-bar icon, and autostart with... Read more
NetShade 6.3.1 - Browse privately using...
NetShade is an anonymous proxy and VPN app+service for Mac. Unblock your Internet through NetShade's high-speed proxy and VPN servers spanning seven countries. NetShade masks your IP address as you... Read more
Dragon Dictate 4.0.7 - Premium voice-rec...
With Dragon Dictate speech recognition software, you can use your voice to create and edit text or interact with your favorite Mac applications. Far more than just speech-to-text, Dragon Dictate lets... Read more
Persecond 1.0.2 - Timelapse video made e...
Persecond is the easy, fun way to create a beautiful timelapse video. Import an image sequence from any camera, trim the length of your video, adjust the speed and playback direction, and you’re done... Read more
GIMP 2.8.14p2 - Powerful, free image edi...
GIMP is a multi-platform photo manipulation tool. GIMP is an acronym for GNU Image Manipulation Program. The GIMP is suitable for a variety of image manipulation tasks, including photo retouching,... Read more
Sandvox 2.10.2 - Easily build eye-catchi...
Sandvox is for Mac users who want to create a professional looking website quickly and easily. With Sandvox, you don't need to be a Web genius to build a stylish, feature-rich, standards-compliant... Read more
LibreOffice 5.0.1.2 - Free, open-source...
LibreOffice is an office suite (word processor, spreadsheet, presentations, drawing tool) compatible with other major office suites. The Document Foundation is coordinating development and... Read more
f.lux 36.1 - Adjusts the color of your d...
f.lux makes the color of your computer's display adapt to the time of day, warm at night and like sunlight during the day. Ever notice how people texting at night have that eerie blue glow? Or wake... Read more
VirtualBox 5.0.2 - x86 virtualization so...
VirtualBox is a family of powerful x86 virtualization products for enterprise as well as home use. Not only is VirtualBox an extremely feature rich, high performance product for enterprise customers... Read more
File Juicer 4.43 - Extract images, video...
File Juicer is a drag-and-drop can opener and data archaeologist. Its specialty is to find and extract images, video, audio, or text from files which are hard to open in other ways. In computer... Read more

ReBoard: Revolutionary Keyboard (Utilit...
ReBoard: Revolutionary Keyboard 1.0 Device: iOS Universal Category: Utilities Price: $1.99, Version: 1.0 (iTunes) Description: Do everything within the keyboard without switching apps! If you are in WhatsApp, how do you schedule a... | Read more »
Tiny Empire (Games)
Tiny Empire 1.1.3 Device: iOS Universal Category: Games Price: $2.99, Version: 1.1.3 (iTunes) Description: Launch cannonballs and blow tiny orcs into thousands of pieces in this intuitive fantasy-themed puzzle shooter! Embark on an... | Read more »
Astropad Mini (Productivity)
Astropad Mini 1.0 Device: iOS iPhone Category: Productivity Price: $4.99, Version: 1.0 (iTunes) Description: *** 50% off introductory price! ​*** Get the high-end experience of a Wacom tablet at a fraction of the price with Astropad... | Read more »
Emo Chorus (Music)
Emo Chorus 1.0.0 Device: iOS Universal Category: Music Price: $1.99, Version: 1.0.0 (iTunes) Description: Realistic Choir simulator ranging from simple Chorus emulation to full ensemble Choir with 128 members. ### introductory offer... | Read more »
Forest Spirit (Games)
Forest Spirit 1.0.5 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0.5 (iTunes) Description: | Read more »
Ski Safari 2 (Games)
Ski Safari 2 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: The world's most fantastical, fun, family-friendly skiing game is back and better than ever! Play as Sven's sister Evana, share... | Read more »
Lara Croft GO (Games)
Lara Croft GO 1.0.47768 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0.47768 (iTunes) Description: Lara Croft GO is a turn based puzzle-adventure set in a long-forgotten world. Explore the ruins of an ancient... | Read more »
Whispering Willows (Games)
Whispering Willows 1.23 Device: iOS Universal Category: Games Price: $4.99, Version: 1.23 (iTunes) Description: **LAUNCH SALE 50% OFF** - Whispering Willows is on sale for 50% off ($4.99) until September 9th. | Read more »
Calvino Noir (Games)
Calvino Noir 1.1 Device: iOS iPhone Category: Games Price: $3.99, Version: 1.1 (iTunes) Description: The film noir stealth game. Calvino Noir is the exploratory, sneaking adventure through the 1930s European criminal underworld.... | Read more »
Angel Sword (Games)
Angel Sword 1.0 Device: iOS Universal Category: Games Price: $6.99, Version: 1.0 (iTunes) Description: Prepare to adventure in the most epic full scale multiplayer 3D RPG for mobile! Experience amazing detailed graphics in full HD.... | Read more »

Price Scanner via MacPrices.net

Apple offering refurbished 2015 13-inch Retin...
The Apple Store is offering Apple Certified Refurbished 2015 13″ Retina MacBook Pros for up to $270 (15%) off the cost of new models. An Apple one-year warranty is included with each model, and... Read more
Apple refurbished 2015 MacBook Airs available...
The Apple Store has Apple Certified Refurbished 2015 11″ and 13″ MacBook Airs (the latest models), available for up to $180 off the cost of new models. An Apple one-year warranty is included with... Read more
21-inch iMacs on sale for up to $120 off MSRP
B&H Photo has 21″ iMacs on sale for up to $120 off MSRP including free shipping plus NY sales tax only: - 21″ 1.4GHz iMac: $999.99 $100 off - 21″ 2.7GHz iMac: $1199.99 $100 off - 21″ 2.9GHz iMac... Read more
5K iMacs on sale for up to $150 off MSRP, fre...
B&H Photo has the 27″ 3.3GHz 5K iMac on sale for $1899.99 including free shipping plus NY tax only. Their price is $100 off MSRP. They have the 27″ 3.5GHz 5K iMac on sale for $2149.99 $2199.99, $... Read more
1.4GHz Mac mini, refurbished, available for $...
The Apple Store has Apple Certified Refurbished 1.4GHz Mac minis available for $419. Apple’s one-year warranty is included, and shipping is free. Their price is $80 off MSRP, and it’s the lowest... Read more
iPad Air 2 on sale for up to $100 off MSRP
Best Buy has iPad Air 2s on sale for up to $100 off MSRP on their online store for a limited time. Choose free shipping or free local store pickup (if available). Sale prices available for online... Read more
MacBook Airs on sale for $100 off MSRP
Best Buy has MacBook Airs on sale for $100 off MSRP on their online store. Choose free shipping or free local store pickup (if available). Sale prices for online orders only, in-store prices may vary... Read more
Big Grips Lift Handle For iPad Air and iPad A...
KEM Ventures, Inc. which pioneered the extra-large, super-protective iPad case market with the introduction of Big Grips Frame and Stand in 2011, is launching Big Grips Lift featuring a new super-... Read more
Samsung Launches Galaxy Tab S2, Its Most Powe...
Samsung Electronics America, Inc. has announced the U.S. release of the Galaxy Tab S2, its thinnest, lightest, ultra-fast tablet. Blending form and function, elegant design and multitasking power,... Read more
Tablet Screen Sizes Expanding as iPad Pro App...
Larger screen sizes are gaining favor as the tablet transforms into a productivity device, with shipments growing 185 percent year-over-year in 2015. According to a new Strategy Analytics’ Tablet... Read more

Jobs Board

*Apple* Music, Business Operations - Apple (...
**Job Summary** This role in Apple Music and in iTunes is working with…the songs that we all enjoy listening to in Apple Music. Your job will be to work wit Read more
Hardware Systems Integration Engineer - *App...
**Job Summary** We are seeking an enthusiastic electrical engineer for the Apple Watch team. This is a design engineering position that entails working with Read more
Engineering Project Manager - *Apple* TV -...
**Job Summary** The iTunes Apps project management team oversees iTunes, Apple TV, DRM and iOS Applications. We are looking for a project manager to help manage and Read more
*Apple* Retail - Multiple Positions (US) - A...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
*Apple* Retail Online Store: Customer Insigh...
**Job Summary** Apple Retail (Online Store) is seeking an experienced e-commerce analytics professional to join the Customer Insights Team. The Web e-Commerce Analyst Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.