DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦22c30bec7⟧ TextFile

    Length: 4608 (0x1200)
    Types: TextFile
    Names: »editenv«

Derivation

└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
    └─⟦4334b4c0b⟧ 
        └─⟦this⟧ »editenv« 

TextFile

mode list.yes
;edit of pascal environment hcø 80.07.21
scope temp opascalenv
if ok.yes
clear temp opascalenv
rename pascalenv.opascalenv
lkj=lookup rcpascalenv
if ok.no
extract from.rcpas rcpascalenv
npascalenv=set 1 disc1
scope login npascalenv
npascalenv=edit rcpascalenv
l./REPLACE/,l1,i/
40 198 42
1 199 NAME 8 97
52 42 198
1 197 DESCRIPTION 13 198 2
40 201 42
1 202 ADDRESS 9 0
52 42 201
1 200 FIRSTADDRESS 13 201 2
40 204 42
1 205 NAME 8 97
52 42 204
1 203 INITPROC 13 204 2
40 207 42
1 208 NAME 8 97
52 42 207
1 206 RESERVEPROC 13 207 2
40 210 42
1 211 NAME 8 97
52 42 210
1 209 RELEASEPROC 12 210
40 213 42
1 214 NAME 8 97
1 215 DEVICE 8 2
52 42 213
1 212 INCLUDE 13 213 2
40 217 42
1 218 NAME 8 97
1 219 DEVICE 8 2
52 42 217
1 216 EXCLUDE 13 217 2
40 221 42
1 222 FLAG 8 2
1 223 NAME 8 97
1 224 MESSAGE 9 0
52 42 221
1 220 SENDMESSAGE 13 221 2
40 226 42
1 227 BUFFER 8 2
1 228 ANSWER 9 0
52 42 226
1 225 WAITANSWER 13 226 2
40 230 42
1 231 NAME 9 97
1 232 BUFFER 9 2
1 233 MESSAGE 9 0
52 42 230
1 229 WAITMESSAGE 13 230 2
40 235 42
1 236 RESULT 8 2
1 237 BUFFER 8 2
1 238 ANSWER 9 0
52 42 235
1 234 SENDANSWER 12 235 2
40 240 42
1 241 BUFFER 9 2
52 42 240
1 239 WAITEVENT 13 240 2
40 243 42
1 244 BUFFER 8 2
52 42 243
1 242 GETEVENT 12 243
40 246 42
1 247 BUFFER 9 2
1 248 FLAG 9 2
52 42 246
1 245 TESTEVENT 13 246 2
40 250 42
1 251 ADDRESS 8 2
52 42 250
1 249 WORDLOAD 13 250 2
40 253 42
1 254 ADDRESS 8 2
1 255 WORD 8 2
52 42 253
1 252 WORDSTORE 12 253
40 257 42
1 258 NAME 8 97
1 259 PARAM 9 0
52 42 257
1 256 CREATEINTERNAL 13 257 2
40 261 42
1 262 NAME 8 97
52 42 261
1 260 STARTINTERNAL 13 261 2
40 264 42
1 265 NAME 8 97
1 266 BUFFER 8 2
52 42 264
1 263 STOPINTERNAL 13 264 2
40 268 42
1 269 NAME 8 97
1 270 FLAG 8 2
1 271 REGISTER 9 0
52 42 268
1 267 MODIFYINTERNAL 13 268 2
40 273 42
1 274 NAME 8 97
52 42 273
1 272 REMOVEPROCESS 13 273 2
40 276 42
1 277 BUFFER 8 2
52 42 276
1 275 REGRETMESSAGE 12 276
40 279 42
1 280 NO 8 2
1 281 W0 9 2
1 282 W1 9 2
1 283 W2 9 0
52 42 279
1 278 FPPROC 12 279
40 285 42
1 286 NAME 8 97
52 40 285
1 284 CONNECTCURI 13 285 2
40 288 42
52 42 288
1 287 UNSTACKCURI 12 288
40 290 42
1 291 W0 9 2
1 292 W1 9 2
1 293 W2 9 2
1 294 W3 9 2
52 42 290
1 289 MONCALL 12 290
40 296 42
52 42 296
1 295 MONITORMODE 12 296
40 298 42
1 299 MASK 8 2
52 42 298
1 297 CPUMASK 13 298 2
40 301 42
1 302 NAME 8 97
1 303 FUNCTION 8 2
52 42 301
1 300 SYSTEMADDRESS 13 301 2
40 305 42
1 306 NAME 8 97
1 307 BUFFER 8 2
52 42 305 
1 304 SENDFURTHER 12 305
40 309 42
1 310 FUNC 8 2
1 311 TIME 8 4
1 312 R    9 4
52 42 309
1 308 SYSTIME 13 309 4
40 316 42 
1 317 I1 8 2
1 318 I2 8 2
52 42 316
1 315 INOR 13 316 2
40 320 42
1 321 I1 8 2
1 322 I2 8 2
52 42 320
1 319 INAND 13 320 2
40 324 42
1 325 I1 8 2
1 326 I2 8 2
52 42 324
1 323 INEXOR 13 324 2
40 328 42
1 329 I1 8 2
1 330 I2 8 2
52 42 328
1 327 SHIFT 13 328 2
40 332 42
1 333 I1 8 2
1 334 I2 8 2
52 42 332
1 331 EXTRACT 13 332 2
40 336 42
1 337 NAME 8 97
1 338 NEWNAME 8 97
52 42 336
1 335 RENAMEENTRY 13 336 2
1 349 ALLOCATE 12 0
/,
l./169commentdid/,l1,i/
170 number of parameters does not agree with declaration
171 number of parameters does not agree with declaration
172 number of parameters does not agree with declaration
173 number of parameters does not agree with declaration
174 number of parameters does not agree with declaration
175 number of parameters does not agree with declaration
176 number of parameters does not agree with declaration
177 number of parameters does not agree with declaration
178 number of parameters does not agree with declaration
179 number of parameters does not agree with declaration
180 number of parameters does not agree with declaration
181 number of parameters does not agree with declaration
182 number of parameters does not agree with declaration
183 number of parameters does not agree with declaration
184 number of parameters does not agree with declaration
185 number of parameters does not agree with declaration
/,f
rename npascalenv.pascalenv
global pascalenv
mode list.no
▶EOF◀