00033 specificités T-1600 / Mitra-15 / Siris
Created by: Pascal J. Bourguignon
T-1600: fonctions SH, CH, TH, SGN, UN et ZER.
Mitra-15: instruction SUPPRIMER pour supprimer un fichier donnée.
T-1600: 10 ALLER EN @+3 -> aller en 13
Mitra-15: 10 I_@50 ; 20 ALLER EN I -> aller en 50 renumérotage tient compte de @50.
Voir aussi les autres limitations; par exemple sur les fichiers. Un fichier Mitra-15/T-1600 avait des blocks de 256 octets (Mitra-15 pouvant écrire les chaines sur plusieurs blocks). Les fichiers implémentés par nasium ont des blocs de 1024 octets.
Sur Siris 7/Siris 8, on avait un compilateur LSE.
Différence lexicales:
Mini Siris
^ ---> **
_ ---> <-
[ ---> (/
] ---> /)
1 à 4 cartes; colonnes 1-4 pour le numéro de ligne, colonnes 5-80 pour le texte de la ligne, jusqu'à 3 cartes continuation sans rien dans les colonnes 1-4.
Commentaires: * ou #
Lire: les données sont sur flot continu de cartes. les chaînes doivent être quotées: 'UNE ''CHAINE''' (comme en lisp avec READ).
Procédure externes: module avec seulement des procédures -> bibliothèque programme référençant des procédures externe => édition de lien
LSE-MITRA-15 LSE-T1600 LSE-UNIX LSE-SIRIS
------------------------ ----------------- -------------- -------------- --------------
commandes: ------------------------------ -------------- --------------
IDentification
DRoits
BOnjour
ADieux
PRendre etat console
------------------------------ -------------- --------------
TA implementé pas encore on pourrait avoir
UT implementé pas encore un autre format.
ENCODER:
Sur Mitra-15, fonctionne comme APpeler: le programme courant est
effacé et remplacé par le programme chargé.
Sur T-1600 (et unix), ENcoder remplace ligne par ligne, sans
effacer le reste du programme courant.
------------------------ ----------------- -------------- -------------- --------------
fonctions: ENV(nom)
ARG(i[,r]) -- pas encore implémenté
LISP(e,p,r) -- debugging
DAT() -> hh*mm*ss*cc jj*mm*aa
EXS(x) = e^x
------------------------ ----------------- -------------- -------------- --------------
extensions:
fonction ATT()
fonction DIS(secteur) -- non implémenté
fonction ETL(a,b)
fonction OUL(a,b)
fonction OUX(a,b)
fonction XIT(ea)
------------------------ ----------------- -------------- -------------- --------------
code caractères ASCII ASCII Unicode EBCDIC
longueur identificateur 5 5 8
numéro de ligne 1-250 1-255 1-65535 1-9999
max longueur de ligne 80 80 65535
max longueur nom fichier 5 5 5 ? 4 !
max répetition format ? 62 ? pas implémenté
taille bloc fichier 256 256 1024 (par défault) 1024 (par défaut)
longueur clé 2 2 2 4
------------------------ ----------------- -------------- -------------- --------------
sémantique @ I_@50 = ligne ALLER EN @+3 pas implémenté
------------------------ ----------------- -------------- -------------- --------------
longueur chaine max 65536 256 65536
------------------------ ----------------- -------------- -------------- --------------
EQC max code 128 256 cl:char-code-limit
eg. 1114112 avec unicode
------------------------ ----------------- -------------- -------------- --------------
AFFICHER[Fn.m,En.m]VE,TA non oui oui
------------------------ ----------------- -------------- -------------- --------------
PAUSE EN LIGNE 000 x x
TERMINE EN LIGNE 000 x x
PAUSE x
TERMINE x
------------------------ ----------------- -------------- -------------- --------------
instructions
FAIRE POUR DEBUT FIN
instruction vide.
format P pour page.
------------------------ ----------------- -------------- -------------- --------------
Mentionné: T-1600: $ signifie quelque chose.
Annoncé: Mitra-15: procédures externes rangées sur disque &init(t,l,c,i) &lir(c) &max(t,l,c) &min(t,l,c)