Skip to content

Commit

Permalink
Add 3.2.13, 3.2.14, and 3.2.15 libraries.
Browse files Browse the repository at this point in the history
  • Loading branch information
James Foster committed May 26, 2016
1 parent 72b142b commit f934c1f
Show file tree
Hide file tree
Showing 21 changed files with 207 additions and 117 deletions.
10 changes: 5 additions & 5 deletions BootDPRO.cmd
@@ -1,5 +1,5 @@
@ECHO OFF
cd ..
del DPRO.*
call BootDPRO
start Dolphin7 DPRO.img7 -q -f Jade\BootDPRO.st
@ECHO OFF
cd ..
del DPRO.*
call BootDPRO
start Dolphin7 DPRO.img7 -q -f Jade\BootDPRO.st
80 changes: 40 additions & 40 deletions BootDPRO.st
@@ -1,40 +1,40 @@
"Boot a DPRO development image"
| list |
SessionManager current splashShowAtStartup: false.
SmalltalkSystemShell allInstances first
position: 20@50;
yourself.
IdeaSpaceShell show
absorbCard: SmalltalkWorkspaceDocument show;
absorbCard: SystemBrowserShell show;
position: 50@80; extent: 1200@750;
yourself.
TestRunner show
position: 900@40;
yourself.
TranscriptShell show.
Debugger defaultExtent: 1000@600.
SourceManager default fileIn: 'RegressionTestsLoad.st'.
list := #(
'Core\Contributions\JGFoster\StoreString for Views.pax'
'Core\Contributions\JGFoster\StoreString for Views Test.pax'
).
ProgressDialog showModalWhile: [:progress |
1 to: list size do: [:i |
| name percent |
name := list at: i.
percent := (i * 100 / list size) asInteger.
progress
value: percent;
text: 'Loading package: ' , name;
yourself.
(File exists: name) ifTrue: [PackageManager current install: name].
].
].
Transcript clear.
(Delay forMilliseconds: 200) wait.
Cursor wait showWhile: [
SourceManager default compressSources.
SessionManager current saveImage.
].
!
"Boot a DPRO development image"
| list |
SessionManager current splashShowAtStartup: false.
SmalltalkSystemShell allInstances first
position: 20@50;
yourself.
IdeaSpaceShell show
absorbCard: SmalltalkWorkspaceDocument show;
absorbCard: SystemBrowserShell show;
position: 50@80; extent: 1200@750;
yourself.
TestRunner show
position: 900@40;
yourself.
TranscriptShell show.
Debugger defaultExtent: 1000@600.
SourceManager default fileIn: 'RegressionTestsLoad.st'.
list := #(
'Core\Contributions\JGFoster\StoreString for Views.pax'
'Core\Contributions\JGFoster\StoreString for Views Test.pax'
).
ProgressDialog showModalWhile: [:progress |
1 to: list size do: [:i |
| name percent |
name := list at: i.
percent := (i * 100 / list size) asInteger.
progress
value: percent;
text: 'Loading package: ' , name;
yourself.
(File exists: name) ifTrue: [PackageManager current install: name].
].
].
Transcript clear.
(Delay forMilliseconds: 200) wait.
Cursor wait showWhile: [
SourceManager default compressSources.
SessionManager current saveImage.
].
!
14 changes: 7 additions & 7 deletions BootJade.cmd
@@ -1,7 +1,7 @@
@ECHO OFF
del JadeDev.*
cd ..
Dolphin7 DPRO.img7 -q -i Jade\JadeDev -d . -x
timeout /T 1 >nul
cd Jade
start ..\Dolphin7 JadeDev.img7 -q -f BootJade.st
@ECHO OFF
del JadeDev.*
cd ..
Dolphin7 DPRO.img7 -q -i Jade\JadeDev -d . -x
timeout /T 1 >nul
cd Jade
start ..\Dolphin7 JadeDev.img7 -q -f BootJade.st
130 changes: 65 additions & 65 deletions BootJade.st
@@ -1,65 +1,65 @@
"Boot a Jade development image"

| list |
list := #(
'JGF Dolphin'
'JGF Fading Dialog'
'GemStone C Interface'
'GemStone Objects'
'GemStone Session'
'GemStone Services'
'VisualWorks Component'
'Jade UI Base'
'Jade from Dolphin'
'Jade Autocompletation'
'Jade Inspector'
'Jade Class Browser'
'Jade Method Browser'
'Jade User Browser'
'Monticello'
'Jade UI'
'Jade System Browser'
'Jade Transcript'
'Jade Process Browser'
'Object Log Browser'
'Jade Login'
'Jade Deployment'
'Contacts Demo'
'Jade in Dolphin'
'Jade Tests'
).
ProgressDialog showModalWhile: [:progress |
1 to: list size do: [:i |
| name percent |
name := list at: i.
percent := (i * 100 / list size) asInteger.
progress
value: percent;
text: 'Loading package: ' , name;
yourself.
PackageManager current install: 'sources\' , name , '.pax'.
].
].
SessionManager current splashShowAtStartup: false.
SmalltalkSystemShell allInstances first
position: 20@50;
yourself.
IdeaSpaceShell allInstances isEmpty ifTrue: [
IdeaSpaceShell show
absorbCard: SmalltalkWorkspaceDocument show;
absorbCard: SystemBrowserShell show;
position: 50@80; extent: 1200@750;
yourself.
].
Debugger defaultExtent: 1000@600.
!
JadeLoginShell show
position: 80@20;
yourself.
Transcript clear.
(Delay forMilliseconds: 200) wait.
Cursor wait showWhile: [
SourceManager default compressSources.
SessionManager current saveImage.
].
!
"Boot a Jade development image"

| list |
list := #(
'JGF Dolphin'
'JGF Fading Dialog'
'GemStone C Interface'
'GemStone Objects'
'GemStone Session'
'GemStone Services'
'VisualWorks Component'
'Jade UI Base'
'Jade from Dolphin'
'Jade Autocompletation'
'Jade Inspector'
'Jade Class Browser'
'Jade Method Browser'
'Jade User Browser'
'Monticello'
'Jade UI'
'Jade System Browser'
'Jade Transcript'
'Jade Process Browser'
'Object Log Browser'
'Jade Login'
'Jade Deployment'
'Contacts Demo'
'Jade in Dolphin'
'Jade Tests'
).
ProgressDialog showModalWhile: [:progress |
1 to: list size do: [:i |
| name percent |
name := list at: i.
percent := (i * 100 / list size) asInteger.
progress
value: percent;
text: 'Loading package: ' , name;
yourself.
PackageManager current install: 'sources\' , name , '.pax'.
].
].
SessionManager current splashShowAtStartup: false.
SmalltalkSystemShell allInstances first
position: 20@50;
yourself.
IdeaSpaceShell allInstances isEmpty ifTrue: [
IdeaSpaceShell show
absorbCard: SmalltalkWorkspaceDocument show;
absorbCard: SystemBrowserShell show;
position: 50@80; extent: 1200@750;
yourself.
].
Debugger defaultExtent: 1000@600.
!
JadeLoginShell show
position: 80@20;
yourself.
Transcript clear.
(Delay forMilliseconds: 200) wait.
Cursor wait showWhile: [
SourceManager default compressSources.
SessionManager current saveImage.
].
!
Binary file added bin/libgcirpc-3.2.13-32.dll
Binary file not shown.
Binary file added bin/libgcirpc-3.2.14-32.dll
Binary file not shown.
Binary file added bin/libgcirpc-3.2.15-32.dll
Binary file not shown.
Binary file added bin/libssl-3.2.13-32.dll
Binary file not shown.
Binary file added bin/libssl-3.2.14-32.dll
Binary file not shown.
Binary file added bin/libssl-3.2.15-32.dll
Binary file not shown.
Binary file modified runtime/Jade.exe
Binary file not shown.
Binary file added runtime/bin/libgcirpc-3.2.13-32.dll
Binary file not shown.
Binary file added runtime/bin/libgcirpc-3.2.14-32.dll
Binary file not shown.
Binary file added runtime/bin/libgcirpc-3.2.15-32.dll
Binary file not shown.
Binary file added runtime/bin/libssl-3.2.13-32.dll
Binary file not shown.
Binary file added runtime/bin/libssl-3.2.14-32.dll
Binary file not shown.
Binary file added runtime/bin/libssl-3.2.15-32.dll
Binary file not shown.
18 changes: 18 additions & 0 deletions sources/GemStone C Interface.pax
Expand Up @@ -57,6 +57,9 @@ package classNames
add: #LibGciRpc64_3_2_10;
add: #LibGciRpc64_3_2_11;
add: #LibGciRpc64_3_2_12;
add: #LibGciRpc64_3_2_13;
add: #LibGciRpc64_3_2_14;
add: #LibGciRpc64_3_2_15;
add: #LibGciRpc64_3_3;
add: #LibGciRpc64_3_4;
add: #LibGciRpc64_310x;
Expand Down Expand Up @@ -313,6 +316,21 @@ LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_12
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_13
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_14
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_15
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
GciThreadSafeLibrary subclass: #LibGciTs_3_3
instanceVariableNames: ''
classVariableNames: ''
Expand Down
24 changes: 24 additions & 0 deletions sources/LibGciRpc64_3_2_13.cls
@@ -0,0 +1,24 @@
"Filed out from Dolphin Smalltalk 7"!

LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_13
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
LibGciRpc64_3_2_13 guid: (GUID fromString: '{AB8A5F68-B8A6-4FD7-9B22-A4977077F85B}')!
LibGciRpc64_3_2_13 comment: ''!
!LibGciRpc64_3_2_13 categoriesForClass!Unclassified! !
!LibGciRpc64_3_2_13 class methodsFor!

displayName

^'64-bit 3.2.13'.
!

fileNameSearch

^'libgcirpc-3.2.13-32.dll'.
! !
!LibGciRpc64_3_2_13 class categoriesFor: #displayName!public! !
!LibGciRpc64_3_2_13 class categoriesFor: #fileNameSearch!public! !

24 changes: 24 additions & 0 deletions sources/LibGciRpc64_3_2_14.cls
@@ -0,0 +1,24 @@
"Filed out from Dolphin Smalltalk 7"!

LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_14
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
LibGciRpc64_3_2_14 guid: (GUID fromString: '{DF2548A9-7827-428A-AA8D-895E984868C1}')!
LibGciRpc64_3_2_14 comment: ''!
!LibGciRpc64_3_2_14 categoriesForClass!Unclassified! !
!LibGciRpc64_3_2_14 class methodsFor!

displayName

^'64-bit 3.2.14'.
!

fileNameSearch

^'libgcirpc-3.2.14-32.dll'.
! !
!LibGciRpc64_3_2_14 class categoriesFor: #displayName!public! !
!LibGciRpc64_3_2_14 class categoriesFor: #fileNameSearch!public! !

24 changes: 24 additions & 0 deletions sources/LibGciRpc64_3_2_15.cls
@@ -0,0 +1,24 @@
"Filed out from Dolphin Smalltalk 7"!

LibGciRpc64_3_2 subclass: #LibGciRpc64_3_2_15
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
LibGciRpc64_3_2_15 guid: (GUID fromString: '{B6A4BC2B-3620-4342-99FC-8173F510F7FB}')!
LibGciRpc64_3_2_15 comment: ''!
!LibGciRpc64_3_2_15 categoriesForClass!Unclassified! !
!LibGciRpc64_3_2_15 class methodsFor!

displayName

^'64-bit 3.2.15'.
!

fileNameSearch

^'libgcirpc-3.2.15-32.dll'.
! !
!LibGciRpc64_3_2_15 class categoriesFor: #displayName!public! !
!LibGciRpc64_3_2_15 class categoriesFor: #fileNameSearch!public! !

0 comments on commit f934c1f

Please sign in to comment.