Use JibExamples in tests

src/Sail-Jib-Tests/JibParsingTest.class.st

@@ -16,7 +16,38 @@ JibParsingTest >> setUp [
 
 { #category : #'tests - program' }
 JibParsingTest >> testParseDuopod [
-	(self parseFileNamed: '/home/boris/work/REMS/duopod.ir') inspect
+	| p |
+
+	p := self parseFileNamed: JibExamples / 'Jib' / 'duopod.ir'.
+
+	self assert: (p isKindOf: JibProgram)
+]
+
+{ #category : #'tests - program' }
+JibParsingTest >> testParseReturn42 [
+	| p |
+
+	p := self parseFileNamed: JibExamples / 'Jib' / 'return42.ir'.
+
+	self assert: (p isKindOf: JibProgram)
+]
+
+{ #category : #'tests - program' }
+JibParsingTest >> testParseUnify1_n [
+	| p |
+
+	p := self parseFileNamed: JibExamples / 'Jib' / 'unify1_n.ir'.
+
+	self assert: (p isKindOf: JibProgram)
+]
+
+{ #category : #'tests - program' }
+JibParsingTest >> testParseUnify1_p [
+	| p |
+
+	p := self parseFileNamed: JibExamples / 'Jib' / 'unify1_p.ir'.
+
+	self assert: (p isKindOf: JibProgram)
 ]
 
 { #category : #'tests - program' }

src/Sail-Jib-Tests/JibTest.class.st

@@ -4,16 +4,6 @@ Class {
 	#category : #'Sail-Jib-Tests'
 }
 
-{ #category : #tests }
-JibTest >> jibExamples [
-	^self class definingGitDirectory / 'examples' / 'Jib'
-]
-
-{ #category : #tests }
-JibTest >> parseExampleFileNamed: relativeFileName [
-	^self parseFileNamed: self jibExamples / relativeFileName
-]
-
 { #category : #tests }
 JibTest >> parseFileNamed: fileName [
 	^self parseString: fileName asFileReference contents