ExternalLibrary.st
author Claus Gittinger <cg@exept.de>
Wed, 03 Apr 2013 20:53:03 +0200
changeset 15054 1667e3fe9e8b
parent 13335 bbed71341524
child 17453 28bacb6df32d
child 18011 deb0c3355881
permissions -rw-r--r--
class: Autoload changed: #autoload when autoloading a class, make sure any extensions of the classes package are also loaded. If a projectDefinition is present, let it load them; otherwise, look for a file named \"extensions.st\" where the autoloaded class is loaded from. This helps with saved code, which has not yet been packaged correctly.

"
 COPYRIGHT (c) 2009 by eXept Software AG
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
"{ Package: 'stx:libbasic' }"

Object subclass:#ExternalLibrary
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'System-Support'
!

!ExternalLibrary class methodsFor:'documentation'!

copyright
"
 COPYRIGHT (c) 2009 by eXept Software AG
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
!

documentation
"
    This is only a hook for compatibility (to be able to fileIn squeak libraries)
"
! !

!ExternalLibrary methodsFor:'error reporting'!

externalCallFailed
    "{ Pragma: +optSpace }"

    "report an error that some external libraray call failed.
     The error is reported by raising the PrimitiveFailure exception."

    <resource: #skipInDebuggersWalkBack>

    |sender|

    sender := thisContext sender.

    ^ PrimitiveFailure raiseRequestWith:(Message selector:sender selector arguments:sender args)
                       in:sender.
! !

!ExternalLibrary class methodsFor:'documentation'!

version_CVS
    ^ '$Header: /cvs/stx/stx/libbasic/ExternalLibrary.st,v 1.3 2011-04-13 09:40:50 stefan Exp $'
! !