Irwin Irwin1985

Crear un fichero

#include <iostream>
#include <fstream>

int main() {
  ofstream MyFile("filename.txt"); 
  
 MyFile &lt;&lt; "First line\n";

Sentencia Lock

Esto se me ocurre para bloquear funciones o variables tanto en módulos como en ficheros únicos.

lock var name = "John" # in this case name is locked and only can be used in it's own scope.

lock fn change_name(new_name):
    name = new_name # allowed

Lo que un lenguaje necesita para ser apto en la creación de intérpretes

Enumerables:

    TokenKind = enum
      tkInteger,
      tkString,
      tkTrue,
      tkFalse,
 tkFunction,

	{
	Rápida introducción a Modern Pascal:
	Pascal es un lenguaje que a pesar de sus años ha evolucionado bastante hasta llegar a ser un lenguaje orientado a objetos. De hecho
	tiene todas las características que te puedes encontrar en un lenguaje de programación (clases, unidades, interfaces, genéricos, etc)

	Además compila de forma rápida y nativa al lenguaje máquina, también tiene un tipado seguro y construcciones de alto nivel pero que
	también puede llegar a bajo nivel si así lo necesitas.

	El compilador libre y más popular es FreePascal http://freepascal.org y el IDE de preferencia es Lazarus (http://lazarus.freepascal.org)

	* =====================================================================================
	* Consulta las tasas del dolar desde el sitio web:
	* https://www.dolarsi.com/api/api.php?type=valoresprincipales
	*
	* Dependencias:
	* VfpRestClient: https://github.com/Irwin1985/VFPRestClient
	* JSONFox: https://github.com/Irwin1985/JSONFox
	*
	* NOTA:
	* 1. Cambie las rutas de vfpRestClient y JSONFox por las correspondientes.

	# Comentarion de una línea
	#[
	Comentario de
	varias
	líneas
	]#

	# Tipos de datos nativos: bool, char, int, float, string
	# Tipos de datos compuestos: arrays, secuencias y conjuntos

	#include<stdio.h>
	#include<stdlib.h>

	struct AbstractBaseClass {
	char tipo;
	};

	struct Entero {
	char tipo;
	int dato;

	#include <stdio.h>
	#include <stdlib.h>
	#include <string.h>

	typedef enum TokenType {
	NUMBER_TYPE,
	STRING_TYPE,
	PLUS_TYPE,
	MINUS_TYPE,
	MUL_TYPE,

	#include <stdio.h>
	#include <stdlib.h>

	typedef double (*math)(double, double);

	double add(double a, double b) { return a + b; }
	double sub(double a, double b) { return a - b; }
	double mul(double a, double b) { return a * b; }
	double divi(double a, double b) { return a / b; }

	set procedure to vfprestclient.prg additive
	do JSONFOX.app

	local oRest, lcShop, lcAccessToken
	lcShop = "mi_tienda_shopify"
	lcAccessToken = strconv("VCILZZY4AQ9YBDN42SMFELTJX6FIM7JM", 13) && base64 encode


	oRest = createobject("Rest")
	oRest.AddRequest(oRest.get, "https://" + lcShop + ".myshopify.com/admin/api/2021-07/shop.json")