/*  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
