Blockly: nouveau bloc Type.

Author: Grahack

microalg_export_blockly.l

@@ -69,6 +69,12 @@
         "</block>"))
 (de Demander ()
   "<block type=\"demander\"></block>")
+(de Type (content)
+  (pack "<block type=\"type\">"
+        "<value name=\"VALUE\">"
+        content
+        "</value>"
+        "</block>"))
 (de Nombre (content)
   (pack "<block type=\"nombre\">"
         "<value name=\"VALUE\">"

web/blockly_microalg.js

@@ -460,7 +460,29 @@ Blockly.MicroAlg['texte'] = function(block) {
 };
 
 // Bloc Type
+Blockly.Blocks['type'] = {
+  init: function() {
+    this.setHelpUrl(malg_url + '#cmd-Type');
+    this.setColour(20);
+    this.appendValueInput('VALUE')
+        .appendField('Type');
+    this.setOutput(true, 'String');
+    this.setTooltip('Convertir une valeur en texte.');
+  }
+};
+
 // Gen Type
+Blockly.MicroAlg['type'] = function(block) {
+  var arg = Blockly.MicroAlg.statementToCode(block, 'VALUE') || '';
+  if (arg === '') return '(Type)';
+  var num_lines = arg.split('\n').length;
+  if (num_lines == 1) {
+    // Prevent indentation if we only have one line.
+    return '(Type ' + arg.substring(Blockly.MicroAlg.INDENT.length) + ')';
+  } else {
+    return '(Type\n' + arg + '\n)';
+  }
+};
 
 // Bloc <
 // Gen <

web/ide_injections.js

@@ -255,6 +255,7 @@ function inject_microalg_blockly_in(elt_id, editor_id, msg) {
             '  <block type="concatener"></block>' +
             '  <block type="demander"></block>' +
             '  <block type="operations"></block>' +
+            '  <block type="type"></block>' +
             '  <block type="texte?"></block>' +
             '  <block type="texte"></block>' +
             '  <block type="nombre?"></block>' +