ftp.nice.ch/Attic/openStep/implementation/gnustep/sources/objcX-0.87.tgz#/objcX-0.87/nib-translator/XmScrollView.m

This is XmScrollView.m in view mode; [Download] [Up]

/*  Archiving Category for ScrollView
    Copyright (C)  1993  The Board of Trustees of
    The Leland Stanford Junior University.  All Rights Reserved.

Authors: Paul Kunz and Imran Qureshi

 * This file is part of the nib translator for 
 * an Objective-C class library for X/Motif

XmScrollView.m,v 1.7 1995/05/16 00:50:10 pfkeb Exp

*/

#include "/NextDeveloper/Headers/objc/typedstream.h"
#include "/NextDeveloper/Headers/objc/Object.h"

#define NXTypedStream TypedStream
#include "objc/typedstream.h"
#include <appkit/ScrollView.h>

@implementation ScrollView (XmArchiving)

- write:(TypedStream *)stream
{
    int		type;
    BOOL	vflag, hflag;
    
    [super write:stream];
#ifdef DEBUG
    printf("->ScrollView");
#endif
    type = _sFlags.borderType;
    vflag = _sFlags.vScrollerRequired;
    hflag = _sFlags.hScrollerRequired;
    objc_write_types(stream, "icc", &type, &vflag, &hflag);
    return self;
}

@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.