Merge pull request OpenSmalltalk#6 from pharo-project/gc-tests

Gc tests

Jenkinsfile

@@ -12,7 +12,7 @@ def shell(params){
 }
 
 def runInCygwin(command){
-    def c = """#!c:\\cygwin64\\bin\\bash --login
+	def c = """#!c:\\tools\\cygwin\\bin\\bash --login
     cd `cygpath \"$WORKSPACE\"`
     set -ex
     ${command}

README.md

@@ -58,6 +58,7 @@ The build in Windows, uses Cygwin. This tool should be installed, and the follow
 - wget
 - curl 
 - make
+- git
 
 ```bash
 $ cmake .

extracted/vm/include/common/sq.h

@@ -603,4 +603,6 @@ sqInt ioFreeModule(void *moduleHandle);
 /* The Squeak version from which this interpreter was generated. */
 extern const char *interpreterVersion;
 
+int ioGetCurrentWorkingDirectorymaxLength(char * aCString, size_t maxLength);
+
 #endif /* _SQ_H */

osx.cmake

@@ -49,7 +49,7 @@ macro(add_third_party_dependencies_per_platform)
     add_third_party_dependency("freetype-2.9.1" ${LIBRARY_OUTPUT_DIRECTORY})
     add_third_party_dependency("libffi-3.3-rc0" ${LIBRARY_OUTPUT_DIRECTORY})
     add_third_party_dependency("libgit2-0.25.1" ${LIBRARY_OUTPUT_DIRECTORY})
-    add_third_party_dependency_with_baseurl("libgit2-mac-1.0.0" ${LIBRARY_OUTPUT_DIRECTORY} "https://github.com/guillep/libgit_build/releases/download/v1.0.1")
+    add_third_party_dependency("libgit2-mac-1.0.0" ${LIBRARY_OUTPUT_DIRECTORY})
     add_third_party_dependency("libpng-1.2.49" ${LIBRARY_OUTPUT_DIRECTORY})
     add_third_party_dependency("libssh2-1.7.0" ${LIBRARY_OUTPUT_DIRECTORY})
     add_third_party_dependency("openssl-1.0.2q" ${LIBRARY_OUTPUT_DIRECTORY})

smalltalksrc/FileAttributesPlugin/FAPathPtr.class.st

@@ -0,0 +1,97 @@
+"
+FAPathPtr simulates the FAPathPtr structure.  See platforms/Cross/plugins/FileAttributesPlugin/faCommon.h for details.
+
+Instance Variables
+	faPath:		<Array>
+	plugin:		<FileAttributesPlugin>
+	sessionId:	<Integer>
+
+faPath
+	- The simulated fapath, currently an Array.
+
+plugin
+	- The owning FileAttributesPlugin.  In case access to the interpreterProxy is required later on.
+
+sessionId
+	- As supplied by the VM.
+
+"
+Class {
+	#name : #FAPathPtr,
+	#superclass : #VMStructType,
+	#instVars : [
+		'sessionId',
+		'faPath',
+		'plugin'
+	],
+	#category : #FileAttributesPlugin
+}
+
+{ #category : #'instance creation' }
+FAPathPtr class >> fromArray: anArray plugin: aFileAttributesPluginSimulator [
+
+	^self new
+		sessionId: anArray first;
+		faPath: anArray second;
+		plugin: aFileAttributesPluginSimulator;
+		yourself
+]
+
+{ #category : #translation }
+FAPathPtr class >> instVarNamesAndTypesForTranslationDo: aBinaryBlock [
+	"Define a CallbackContext, the argument to sendInvokeCallbackContext:
+	 self typedef"
+
+	self instVarNames do:
+		[:ivn|
+		aBinaryBlock
+			value: ivn
+			value: (ivn caseOf: {
+						['sessionId']				-> [#'int'].
+						['faPath']			-> [#'fapath *']}
+						otherwise: [#'void *'])]
+]
+
+{ #category : #'instance creation' }
+FAPathPtr class >> plugin: aFileAttributesPlugin [
+
+	^self new 
+		plugin: aFileAttributesPlugin;
+		yourself
+]
+
+{ #category : #accessing }
+FAPathPtr >> faPath [
+
+	^ faPath
+]
+
+{ #category : #accessing }
+FAPathPtr >> faPath: anObject [
+
+	^ faPath := anObject.
+]
+
+{ #category : #accessing }
+FAPathPtr >> plugin [
+
+	^ plugin
+]
+
+{ #category : #accessing }
+FAPathPtr >> plugin: anObject [
+
+	^ plugin := anObject.
+]
+
+{ #category : #accessing }
+FAPathPtr >> sessionId [
+
+	^ sessionId
+]
+
+{ #category : #accessing }
+FAPathPtr >> sessionId: anObject [
+
+	^ sessionId := anObject.
+]