Return to NXConstantString.m CVS log

Up to [Apple Darwin 0.x] / objc

Annotation of objc/NXConstantString.m, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
                      3:  *
                      4:  * @APPLE_LICENSE_HEADER_START@
                      5:  * 
                      6:  * "Portions Copyright (c) 1999 Apple Computer, Inc.  All Rights
                      7:  * Reserved.  This file contains Original Code and/or Modifications of
                      8:  * Original Code as defined in and that are subject to the Apple Public
                      9:  * Source License Version 1.0 (the 'License').  You may not use this file
                     10:  * except in compliance with the License.  Please obtain a copy of the
                     11:  * License at http://www.apple.com/publicsource and read it before using
                     12:  * this file.
                     13:  * 
                     14:  * The Original Code and all software distributed under the License are
                     15:  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
                     16:  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
                     17:  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
                     18:  * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
                     19:  * License for the specific language governing rights and limitations
                     20:  * under the License."
                     21:  * 
                     22:  * @APPLE_LICENSE_HEADER_END@
                     23:  */
                     24: /*
                     25:        NXConstantString.m
                     26:        Copyright 1991, NeXT, Inc.
                     27:        Responsibility:
                     28: */
                     29: 
                     30: #ifndef KERNEL
                     31: #ifdef SHLIB
                     32: #import "shlib.h"
                     33: #endif SHLIB
                     34: 
                     35: #import "NXStringPrivate.h"
                     36: 
                     37: @implementation NXConstantString
                     38: 
                     39: // We allow allocFromZone:, since this what typedstreams will use when
                     40: // unarchiving.  However, we make the designated initializer raise.
                     41: 
                     42: - initFromCharactersNoCopy:(unichar *)chars length:(unsigned)len
                     43: {
                     44:     return [self doesNotRecognize:_cmd];
                     45: }
                     46: 
                     47: // Simply returns self, since NXConstantString's cannot be freed.
                     48: // Beware that NXConstantString's will disappear when dynamically loaded
                     49: // code is unloaded!
                     50: 
                     51: - copyFromZone:(NXZone *)zone
                     52: {
                     53:     return self;
                     54: }
                     55: 
                     56: // Ignore free messages
                     57: 
                     58: - free
                     59: {
                     60:     return nil;
                     61: }
                     62: 
                     63: - _reallyFree
                     64: {
                     65:     return [super free];
                     66: }
                     67: 
                     68: // When unarchiving, replace ourselves with an NXReadOnlyString.
                     69: 
                     70: // Ugh.  We would rather write out an NXReadOnlyString in the first place,
                     71: // but because of how typedstreams work this won't work at all.
                     72: // By the time we recieve the write method, our class name has already
                     73: // been written out.  That code should be moved to [Object write]
                     74: // so that it only happens when [super write] is called (mself - 10/8/91).
                     75: 
                     76: - finishUnarchiving
                     77: {
                     78:     NXString *newString = [NXReadOnlyString alloc] ;
                     79:     
                     80:     [newString initFromCharacters:characters length:_length];
                     81:     [self _reallyFree];
                     82:     return newString;
                     83: }
                     84: 
                     85: @end
                     86: #endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.