Home » Personal collection » Acorn hard disk » apps » MultiStore » !MultiStor/LoadCLib

!MultiStor/LoadCLib

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn hard disk » apps » MultiStore
Filename: !MultiStor/LoadCLib
Read OK:
File size: 02AC bytes
Load address: 0000
Exec address: 0000
File contents
|
| Safe loader for Shared C Library
| Copyright � Merlyn Kline, 1991
|
Set CLib$Temp 0
*RMEnsure SharedCLibrary 0.00 Set CLib$Temp 1
*RMEnsure SharedCLibrary %0 If CLib$Temp=0 Then Error Your Shared C Library is out of date (you need v%0 or above). Please update your !System, reset your computer and try again.<0>
*RMEnsure SharedCLibrary %0 If "<System$Path>"="" Then Error Can't find System Resources. Please double-click on a copy of !System and Try again.<0>
*RMEnsure SharedCLibrary %0 RMLoad System:Modules.CLib
*RMEnsure SharedCLibrary %0 Error Your Shared C Library is out of date (you need v%0 or above). Please update your !System and try again.<0>
*UnSet CLib$Temp
|
|
|
00000000  7c 0a 7c 20 53 61 66 65  20 6c 6f 61 64 65 72 20  ||.| Safe loader |
00000010  66 6f 72 20 53 68 61 72  65 64 20 43 20 4c 69 62  |for Shared C Lib|
00000020  72 61 72 79 0a 7c 20 43  6f 70 79 72 69 67 68 74  |rary.| Copyright|
00000030  20 a9 20 4d 65 72 6c 79  6e 20 4b 6c 69 6e 65 2c  | . Merlyn Kline,|
00000040  20 31 39 39 31 0a 7c 0a  53 65 74 20 43 4c 69 62  | 1991.|.Set CLib|
00000050  24 54 65 6d 70 20 30 0a  2a 52 4d 45 6e 73 75 72  |$Temp 0.*RMEnsur|
00000060  65 20 53 68 61 72 65 64  43 4c 69 62 72 61 72 79  |e SharedCLibrary|
00000070  20 30 2e 30 30 20 53 65  74 20 43 4c 69 62 24 54  | 0.00 Set CLib$T|
00000080  65 6d 70 20 31 0a 2a 52  4d 45 6e 73 75 72 65 20  |emp 1.*RMEnsure |
00000090  53 68 61 72 65 64 43 4c  69 62 72 61 72 79 20 25  |SharedCLibrary %|
000000a0  30 20 49 66 20 43 4c 69  62 24 54 65 6d 70 3d 30  |0 If CLib$Temp=0|
000000b0  20 54 68 65 6e 20 45 72  72 6f 72 20 59 6f 75 72  | Then Error Your|
000000c0  20 53 68 61 72 65 64 20  43 20 4c 69 62 72 61 72  | Shared C Librar|
000000d0  79 20 69 73 20 6f 75 74  20 6f 66 20 64 61 74 65  |y is out of date|
000000e0  20 28 79 6f 75 20 6e 65  65 64 20 76 25 30 20 6f  | (you need v%0 o|
000000f0  72 20 61 62 6f 76 65 29  2e 20 50 6c 65 61 73 65  |r above). Please|
00000100  20 75 70 64 61 74 65 20  79 6f 75 72 20 21 53 79  | update your !Sy|
00000110  73 74 65 6d 2c 20 72 65  73 65 74 20 79 6f 75 72  |stem, reset your|
00000120  20 63 6f 6d 70 75 74 65  72 20 61 6e 64 20 74 72  | computer and tr|
00000130  79 20 61 67 61 69 6e 2e  3c 30 3e 0a 2a 52 4d 45  |y again.<0>.*RME|
00000140  6e 73 75 72 65 20 53 68  61 72 65 64 43 4c 69 62  |nsure SharedCLib|
00000150  72 61 72 79 20 25 30 20  49 66 20 22 3c 53 79 73  |rary %0 If "<Sys|
00000160  74 65 6d 24 50 61 74 68  3e 22 3d 22 22 20 54 68  |tem$Path>"="" Th|
00000170  65 6e 20 45 72 72 6f 72  20 43 61 6e 27 74 20 66  |en Error Can't f|
00000180  69 6e 64 20 53 79 73 74  65 6d 20 52 65 73 6f 75  |ind System Resou|
00000190  72 63 65 73 2e 20 50 6c  65 61 73 65 20 64 6f 75  |rces. Please dou|
000001a0  62 6c 65 2d 63 6c 69 63  6b 20 6f 6e 20 61 20 63  |ble-click on a c|
000001b0  6f 70 79 20 6f 66 20 21  53 79 73 74 65 6d 20 61  |opy of !System a|
000001c0  6e 64 20 54 72 79 20 61  67 61 69 6e 2e 3c 30 3e  |nd Try again.<0>|
000001d0  0a 2a 52 4d 45 6e 73 75  72 65 20 53 68 61 72 65  |.*RMEnsure Share|
000001e0  64 43 4c 69 62 72 61 72  79 20 25 30 20 52 4d 4c  |dCLibrary %0 RML|
000001f0  6f 61 64 20 53 79 73 74  65 6d 3a 4d 6f 64 75 6c  |oad System:Modul|
00000200  65 73 2e 43 4c 69 62 0a  2a 52 4d 45 6e 73 75 72  |es.CLib.*RMEnsur|
00000210  65 20 53 68 61 72 65 64  43 4c 69 62 72 61 72 79  |e SharedCLibrary|
00000220  20 25 30 20 45 72 72 6f  72 20 59 6f 75 72 20 53  | %0 Error Your S|
00000230  68 61 72 65 64 20 43 20  4c 69 62 72 61 72 79 20  |hared C Library |
00000240  69 73 20 6f 75 74 20 6f  66 20 64 61 74 65 20 28  |is out of date (|
00000250  79 6f 75 20 6e 65 65 64  20 76 25 30 20 6f 72 20  |you need v%0 or |
00000260  61 62 6f 76 65 29 2e 20  50 6c 65 61 73 65 20 75  |above). Please u|
00000270  70 64 61 74 65 20 79 6f  75 72 20 21 53 79 73 74  |pdate your !Syst|
00000280  65 6d 20 61 6e 64 20 74  72 79 20 61 67 61 69 6e  |em and try again|
00000290  2e 3c 30 3e 0a 2a 55 6e  53 65 74 20 43 4c 69 62  |.<0>.*UnSet CLib|
000002a0  24 54 65 6d 70 0a 7c 0a  7c 0a 7c 0a              |$Temp.|.|.|.|
000002ac