gnustep/libs-gui
0
0
Fork 0
mirror of https://github.com/gnustep/libs-gui.git synced 2025-04-23 15:11:37 +00:00
Code Issues Projects Releases Packages Wiki Activity

Updated for services

Browse source 
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/trunk@3309 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Richard Frith-MacDonald 1998-11-23 21:41:26 +00:00
parent 3c8c8be841
commit 12c8bb4873
3 changed files with 56 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
Testing/GNUmakefile
View file

@ -25,6 +25,12 @@
# If not, write to the Free Software Foundation,
# 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
ifeq ($(GNUSTEP_SYSTEM_ROOT),)
GNUSTEP_SYSTEM_ROOT = $(TOPLEV)
endif
GNUSTEP_INSTALLATION_DIR = $(GNUSTEP_SYSTEM_ROOT)
GNUSTEP_MAKEFILES = $(GNUSTEP_SYSTEM_ROOT)/Makefiles
include $(GNUSTEP_MAKEFILES)/common.make
@ -32,11 +38,30 @@ include $(GNUSTEP_MAKEFILES)/common.make
# The application to be compiled
TEST_TOOL_NAME = testpb
TEST_APP_NAME = buttons matrix menu nsbox nsbrowser nsbrowsercell \
nscursor nsimage nsscroller scrollview scrollview2 \
slider windows
# The source files to be compiled
testpb_OBJC_FILES = testpb.m
buttons_OBJC_FILES = buttons.m
matrix_OBJC_FILES = matrix.m
menu_OBJC_FILES = menu.m
nsbox_OBJC_FILES = nsbox.m
nsbrowser_OBJC_FILES = nsbrowser.m
nsbrowsercell_OBJC_FILES = nsbrowsercell.m
nscursor_OBJC_FILES = nscursor.m ColorView.m
nsimage_OBJC_FILES = nsimage.m ImageView.m
nsscroller_OBJC_FILES = nsscroller.m
scrollview_OBJC_FILES = scrollview.m TestView.m
scrollview2_OBJC_FILES = scrollview2.m
slider_OBJC_FILES = slider.m
-include GNUmakefile.preamble
include $(GNUSTEP_MAKEFILES)/test-tool.make
include $(GNUSTEP_MAKEFILES)/test-application.make
include $(GNUSTEP_MAKEFILES)/aggregate.make
-include GNUmakefile.postamble

2
Testing/GNUmakefile.preamble
View file

@ -30,7 +30,7 @@ ADDITIONAL_INCLUDE_DIRS += -I../Headers -I$(GNUSTEP_SYSTEM_ROOT)/Headers
ADDITIONAL_LIB_DIRS +=
# Additional libraries when linking tools
ADDITIONAL_TOOL_LIBS += -lgnustep-gui -ltiff
ADDITIONAL_TOOL_LIBS += -lgnustep-gui -ltiff -lFoundationExt
# Additional libraries when linking applications
ADDITIONAL_GUI_LIBS +=

42
Testing/testpb.m
View file

@ -55,21 +55,39 @@ void NSBeep(void) // dummy define
int
main(int argc, char** argv)
{
pbOwner *owner = [pbOwner new];
NSPasteboard *pb;
NSArray *types;
NSData *d;
NSAutoreleasePool *pool = [NSAutoreleasePool new];
pbOwner *owner = [pbOwner new];
NSPasteboard *pb;
NSArray *types;
NSData *d;
[NSObject enableDoubleReleaseCheck: YES];
[NSObject enableDoubleReleaseCheck: YES];
types = [NSArray arrayWithObjects:
types = [NSArray arrayWithObjects:
NSStringPboardType, NSFileContentsPboardType, nil];
pb = [NSPasteboard generalPasteboard];
[pb declareTypes: types owner: owner];
[pb setString: @"This is a test" forType: NSStringPboardType];
d = [pb dataForType: NSFileContentsPboardType];
printf("%.*s\n", [d length], [d bytes]);
exit(0);
pb = [NSPasteboard generalPasteboard];
[pb declareTypes: types owner: owner];
[pb setString: @"This is a test" forType: NSStringPboardType];
d = [pb dataForType: NSFileContentsPboardType];
printf("%.*s\n", [d length], [d bytes]);
pb = [NSPasteboard pasteboardWithUniqueName];
types = [NSArray arrayWithObjects:
NSStringPboardType, nil];
[pb declareTypes: types owner: owner];
[pb setString: @"a lowercase test string" forType: NSStringPboardType];
if (NSPerformService(@"To upper", pb) == NO)
{
printf("Failed to perform 'To upper' service\n");
}
else
{
NSString *result = [pb stringForType: NSStringPboardType];
printf("To upper - result - '%s'\n", [result cString]);
}
[pool release];
exit(0);
}