SF.net SVN: frontierkernel: [1630] Frontier/branches/ Frontier_Long_File_Paths/Common/source/mac.c

[<cre...@us...>]

Revision: 1630
          http://svn.sourceforge.net/frontierkernel/?rev=1630&view=rev
Author:   creecode
Date:     2007-02-26 12:56:06 -0800 (Mon, 26 Feb 2007)

Log Message:
-----------
removed system 6 related code

Modified Paths:
--------------
    Frontier/branches/Frontier_Long_File_Paths/Common/source/mac.c

Modified: Frontier/branches/Frontier_Long_File_Paths/Common/source/mac.c
===================================================================
--- Frontier/branches/Frontier_Long_File_Paths/Common/source/mac.c	2007-02-26 19:46:59 UTC (rev 1629)
+++ Frontier/branches/Frontier_Long_File_Paths/Common/source/mac.c	2007-02-26 20:56:06 UTC (rev 1630)
@@ -200,75 +200,13 @@
 	} /*initmacintosh*/
 
 
-#ifdef flsystem6
-
-short countinitialfiles (void) {
-
-	short message, ctfiles;
-	
-	CountAppFiles (&message, &ctfiles);
-	
-	if (message == 0)
-		return (ctfiles);
-		
-	return (0);
-	} /*countinitialfiles*/
-	
-	
-void getinitialfile (short ix, bigstring fname, short *vnum) {
-
-	AppFile appfilerecord;
-
-	GetAppFiles (ix, &appfilerecord);
-	
-	copystring (appfilerecord.fName, fname);
-	
-	*vnum = appfilerecord.vRefNum;
-	} /*getinitialfile*/
-
-#endif
-
-#if 0
-
-boolean installgestaltfunction (void) {
-	
-	Handle hgdef;
-	ProcPtr x;
-	
-	hgdef = GetResource ('GDEF', idgestaltfunction);
-	
-	if (hgdef == nil) /*didn't find gestalt definition function*/
-		return (false);
-	
-	x = (ProcPtr) *hgdef;
-	
-	if (NewGestalt (idgestaltselector, x) != noErr) {
-		
-		if (ReplaceGestalt (idgestaltselector, x, &x) != noErr) {
-			
-			ReleaseResource (hgdef);
-			
-			return (false);
-			}
-		}
-	
-	DetachResource (hgdef);
-	
-	return (true);
-	} /*installgestaltfunction*/
-
-#endif
-
-
-
 #if TARGET_API_MAC_CARBON
 
-void WriteToConsole (char *s)
-{
+void WriteToConsole (char *s) {
 
 	CFShow(CFStringCreateWithCString(NULL,s,kCFStringEncodingMacRoman));
 		
-}
+	}
 
 void DoErrorAlert(OSStatus status, CFStringRef errorFormatString)
 {	


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.